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1.0 ABSTRACT 

THIS DIAGNOSTIC IS DIVIDED INTO fOUR BASIC SECTIONS: 

1. A CHECK Of THE CONSOLE TERMINAL INTERFACE LOGIC 

2. A CHECK OF THE PRINTING CHARACTERISTICS AND CONTROL LOGIC 

5. AN ECHO PORTION DESIGNED TO CHECK THE KEYBOARD AND TO AID 
THE DIAGNOSIS OF TERMINAL PROBLEMS. 

4. A CHECK OF THE VARIOUS LA56 OPTIONS. 



IN 



PATTERNS USED BY THE PRINTING TESTS WERE CHOSEN FOR EASE Of VISUAL 
VERIFICATION. THE ECHO TESTS WERE DESIGNED FOR MAXIMUM FLEXIBILITY, 
WITH TEST 2A ALLOWING ANY DESIRED PATTERN TO BE USED. 



2.0 REQUIREMENTS 

2.1 EQUIPMENT 

THE DIAGNOSTIC IS WRITTEN TO RUN ON ALL MODELS OF THE PDP-11 COMPUTER 
WITH EITHER DHll OR DJil MULTIPLEXER. UP TO 16 MULTIPLEXERS ♦ 256 
TERMINALS ARE DRIVEN. THE DIAGNOSTIC IS SET TO TEST THE TERMINALS AT 
500 BAUD. TO CHANGE ANY PARAMETERS FOR THE DHll INTERFACE REFER TO 
THE DHll PARAMETER TABLE IN THE LISTING. 



2.2 STORAGE 

THE DIAGNOSTIC PROGRAM USES ALL OF AK OF MEMORY WITH EXCEPTION OF THE 
AREA USED BY THE ABSOLUTE LOADER. 



2.3 PRELIMINARY PROGRAMS 

ANY APPLICABLE POP-11 DIAGNOSTICS SHOULD BE RUN ON THE PROCESSOR. IF 
ANY ERRORS ARE ENCOUNTERED DURING THE INTERFACE CHECK. REFER TO THE 
APPROPRIATE INTERFACE DIAGNOSTIC FOR FURTHER HELP IN LOCATING THE 
PROBLEM IF NEEDED. 
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5.0 LOADING PROCEOURF & INITIALIZATION 

LOAD THE LA56 DIAGNOSTIC PROGRAH TAPE FOLLOWING NORMAL PROCEDURES. 
BEFORE STARTING THE PROGRAM, REFER TO THE EXISTING LINE TABLE (ELTAB) 
AND CLEAR THE PROPER BITS IN THE TABLE TO INDICATE WHICH TERMINALS ARE 
TO BE TESTED. A DETAILED DESCRIPTION IS CONTAINED IN THE PROGRAM 
LISTING. ALSO. REFER TO THE DESCRIPTION OF THE ROUTINE "DLY". TIME 
DELAYS USED BY THE PROGRAM ARE A FUNCTION OF THE CPU MODEL AND MEMORY 
TYPE AND SHOULD BE SET UP BEFORE RUNNING THE DIAGNOSTIC. THE ROUTINE 
IS PRESET FOR A PDP-11/40 WITH CORE MEMORY. 

IF A HARDWARE SWITCH REGISTER DOES NOT EXIST. THE PROGRAM WILL USE THE 
CONTENTS OF LOCATION 176 AS THE VALUE OF THE SWITCHES. THE PROGRAM 
WILL PRINT OUT THE PRESENT CONTENTS OF THE SOFTWARE SWITCH REGISTER 
WHEN THE PROGRAM IS STARTED. IT WILL THEN ASK FOR THE NEW CONTENTS TO 
BE INPUT TO THE SOFTWARE SWITCH REGISTER. TYPE CARRIAGE RETURN TO 
FINISH INPUT. 



4.0 STARTING PROCEDURE 

4.1 STARTING ADDRESSES 



20018) = 
204(8) = 



EXECUTE 
EXECUTE 



WITH DHll 
WITH DJil 



MULTIPLEXER 
MULTIPLEXER 



4.1.1 EXECUTE WITH DHll MULTIPLEXER 

A. REFER TO SECTION 5.0 AND MAKE SURE THE PROPER BITS IN THE 
ElTAB TABLE INDICATING WHAT TERMINALS ARE TO BE TESTED HAVE 
BEEN CLEARED AND THE CORRECT DELAY COUNT FOR THE CPU AND 
MEMORY TYPE IN USE HAS BEEN SET IN TIMER. 

B. set SWITCH REGISTER = 200(8) AND PRESS THE LOAD ADDRESS 
SWITCH 

C. SET THE SWITCH REGISTER BUS 7-0 EQUAL TO THE PAPER WIDTH IN 
TERMS OF THE NUMBER OF COLUMNS (OCTAL), REFER TO SECTION 
5.1 .4. 



SET SWITCH 8 UP IF IT IS DESIRED TO SELECT A 
RATHER THAN BEGIN THE NORMAL PRINTING 
OTHERWISE, LEAVE SWITCH 8 DOWN. 



SPECIFIC TEST 
TEST SEQUENCE. 



PRESS THE START SWITCH. IF BIT 8 WERE ZERO WHEN STARTING THE 
NUMBER OF DHirS UNDER TEST WILL BE PRINTED ON ALL EXISTING 
TERMINALS AND THE PRINTER TESTS ARE EXECUTED SEQUENTIALLY. 
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208 PAGE 5 

209 

210 

211 F. IF BIT 8 WERE 1 WHEN STARTING. THE NUMBER OF DHll'S UNDER 

212 TEST WILL BE INDICATED AND THE MESSAGE "SELECT TEST NUMBER" 

213 WILL BE PRINTED ON ALL EXISTING TERMINALS. THE PROGRAM UlLL 
2U THEN BE WAITING FOR A TEST SELECTION VIA ANY TERMINAL 
215 KEYBOARD (IF SWITCH 15 IS DOWN). REFER TO SECTION 5.2 
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4.1.2 EXECUTE WITH DJil MULTIPLEXER 



A. SANE INSTRUCTIONS AS 4.1.1 EXCEPT THAT THE STARTING ADDRESS 
IN B IS 204 AND THE FIRST MESSAGE PRINTED WILL BE THE NUMBER 
OF DJirS UNDER TEST. 



5.0 OPERATING PROCEDURE 

THE PROGRAM IS GENERALLY CONTROLLED FROM A MULTIPLEXER TERMINAL, BUT A 
FEW SWITCH REGISTER CONTROLS ARE AVAILABLE. THE PRINTER TEST WILL 
OUTPUT TO ALL TERMINALS OR TO THE ONE UNDER TEST AS A FUNCTION OF SR 
BIT 15. ECHO TESTS WILL REFERENCE ONLY THE TERMINAL SELECTING THE 
TESTI. OR ALL TERMINALS DEPENDING ON THE SPECIFIC TEST AND THE SETTING 
OF SWITCH 15. 



5.1 SWITCH REGISTER CONTROL 

THE VARIOUS SWITCHES AND THEIR FUNCTIONS ARE LISTED BELOW. SWITCHES 
MAY BE CHANGED AND SET AS DESIRED EXCEPT AS NOTED IN THE SPECIFIC 
SWITCH DESCRIPTIONS. REFER TO THE DETAILED SWITCH DESCRIPTIONS FOR 
FURTHER, MORE COMPLETE INFORMATION. 



SWITCH NUMBER 
15 

15 

8 

7-0 



DESCRIPTION 

KUP) = HALT AT END OF TEST 

O(DOWN) = CONTINUE TEST SEQUENCE 

KUP) = DRIVE ONLY SELECTED TERMINAL 

O(DOWN) = DRIVE ALL TERMINALS 

KUP) = SELECT TEST (AT START-UP ONLY) 

O(DOWN) = START NORMAL TEST SEQUENCE 



NUMBER OF COLUMNS AT START-UP 
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WITH SWITCH 15 IN THE UP POSITION. THE PROGRAM WILL HALT AT THE END OF 
THE CURRENT TEST. REPLACING SWITCH 15 TO THE DOWN POSITION AND 
PRESSING CONTINUE WILL CONTINUE THE NORMAL TEST OPERATION. 



5.1.2 SWITCH 15 

PLACING SWITCH 15 IN THE DOWN POSITION WILL CAUSE THE DRIVING OF ALL 
TERMINALS. IF SWITCH 15 IS UP. ONLY THE TERMINAL UNDER TEST IS 
DRIVEN. 



NOTE 

SWITCH 15 CAN ONLY BE CHANGED WHEN THE 
PROGRAM IS WAITING FOR A TEST SELECTION. 



5.1.5 SWITCH 8 (AT START-UP ONLY) 

TO SELECT A SPECIFIC TEST RATHER THAN START THE PRINTING TEST 
SEQUENCE, PLACE SWITCH 8 UP BEFORE STARTING THE DIAGNOSTIC. 
OTHERWISE. LEAVE SWITCH 8 DOWN TO RUN THE NORMAL TEST SEQUENCE. THIS 
SWITCH IS ONLY EFFECTIVE AT START-UP OF THE PROGRAM. 



5.1.4 SWITCHES 7 TO 0 (AT START-UP ONLY) 

AT START-UP ONLY. SWITCHES 7 TO 0 ARE USED TO SET THE DESIRED MAXIMUM 
NUMBER Of COLUMNS THE DIAGNOSTIC IS TO TEST. IF THE NUMBER SET IS 
GREATER THAN 132(10) OR LESS THAN 30(10). THE PROGRAM WILL DEFAULT TO 
132(10). THE VALUE SET MUST BE IN OCTAL FORM. 
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THE PROGRAM WILL ALWAYS BE UNDER KEYBOARD CONTROL. CONTROL FROM THE 
SWITCH REGISTER DURING PROGRAM EXECUTION IS ONLY POSSIBLE WITH SWlTCHS 
13 AND 15 AS STATED ABOVE. 

TYPING THE "RUBOUT" (DEL) KEY ON ANY TERMINAL KEYBOARD WILL TERMINATE 
THE TEST IMMEDIATELY. AFTER TERMINATION OF THE TEST THE FOLLOWING 
MESSAGE WILL BE TYPED: 



SELECT TEST » 

AT THIS TIME, TYPE THE DESIRED TEST NUMBER FOLLOWED BY ANY ONE OF 
FOLLOWING CONTROL CHARACTERS: 



THE 



(PERIOD) 



RUN THE SELECTED TEST ONCE AND RETURN FOR ANOTHER 
TEST SELECTION. 



LOOP ON THE SELECTED 
TYPED. 



TEST UNTIL A "RUBOUT" IS 



S - START THE TEST SEQUENCE WITH THE SELECTED TEST. 

CONTINUE TO LOOP ON THE PRINTING TEST SEQUENCE 
UNTIL A "RUBOUT" IS TYPED. 

THE L OR S MAY BE EITHER UPPER OF LOWER CASE, BUT THE TEST NUMBER MUST 
ALWAYS BE A 2 DIGIT OCTAL NUMBER. FOR ALL ECHO TESTS. THE "L" AND "S" 
WILL ONLY RUN THE TEST ONCE (THE SAME AS IF TYPING A PERIOD). FOR ALL 
OPTION TESTS, THE "S" WILL ONLY RUN THE TEST ONCE (THE SAME AS IF 
TYPING A PERIOD), HOWEVER, TYPING AN "L" WILL CAUSE THE PROGRAM TO 
LOOP ON THE SELECTED TEST. IF AN ERROR IS DETECTED IN THE TEST 
SELECTION (ILLEGAL TEST NUMBER OR CONTROL CHARACTER) A QUESTION MARK 
IS PRINTED AND THE MESSAGE WILL BE REPEATED. 



5.3 *G FUNCTION 

THE PROGRAM WILL SENSE "G COMMANDS WHEN STARTED AT LOCATION 200 OR 
204. CONSOLE SWITCH REGISTER VALUES WILL BE PRINTED ON THE TTY AT 
START UP TIME AND THE NEW VALUE ENTERED BY OPERATOR. TO CHANGE A 
VALUE, TYPE "G. AT THE END OF A TEST THE NEW VALUE CAN BE ENTERED. 
•U ALLOWS INCORRECT DATA TO BE DELETED AND A NEW ENTRY STARTED. ALL 
INPUTS ARE TERMINATED BY CARRIAGE RETURN. 
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6.0 TEST DESCRIPTIONS 

6.1 PRINTING TESTS 

THESE TESTS ARE DESIGNED AS A TEST OF THE PRINTING MECHANISM AND THE 
ASSOCIATED CONTROL LOGIC. AT THE BEGINNING OF EACH TEST. THE TEST 
NUMBER WILL BE PRINTED INDICATING WHICH TEST IS BEING EXECUTED AND. IF 
THE TEST IS A FUNCTION OF THE NUMBER OF COLUMNS, THE NUMBER OF COLUMNS 
BEING TESTED WILL BE INDICATED. A DETAILED DESCRIPTION AND SAMPLE 
PATTERNS FOR EACH PRINTING TEST FOLLOWS: 



6.1.1 TEST 0 - DATA PATH TEST 

THIS TEST IS USED TO TEST THE DATA LINES TO AND THROUGH THE INTERFACE 
AND TO THE TERMINAL. AN ALTERNATING BIT PATTERN IS SENT WHICH WILL 
PRINT ALTERNATING *'S AND U'S IN A CHECKERBOARD PATTERN TO THE MAXIMUM 
COLUMN WIDTH. THE STARTING CHARACTER FOR EACH LINE IS ALTERNATED AND 
A TOTAL OF FOUR LINES ARE PRINTED. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY RECEIVED CARRIAGE RETURN. THERE WILL BE A BLANK LINE 
BETWEEN EACH PRINTED LINE. 



SEO 0010 



EXAMPLE: 



*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U 
U»U*U*U*U*U*U*U*U*U*U*U*U*U*U* 

•u*u*u*u*u*u*u»u*u*u«u*u*u*u*u 
u*u*u*u*u*u*u*u*u*u*u*u*u*u*u* 



6.1.2 TEST 1 - PRINTABLE CHARACTER TEST 

THIS TEST PRODUCES A CHECK OF ALL 94(10) PRINTABLE 
CHARACTERS. THE CHARACTERS ARE PRINTED IN GROUPS OF THREE 
WITH THREE GROUPS PER LINE, SEPARATED BY THREE SPACES 
BETWEEN GROUPS. THE FIRST COLUMN WILL CONTAIN ALL ASCII 
COOES FROM 040 TO 077. COLUMN TWO WILL CONTAIN ALL ASCII 
CODES FROM 100 TO 137 - PRIMARILY THE CAPITAL LETTER SET. 
THE LAST COLUMN WILL CONTAIN ALL ASCII CODES FROM 140 TO 
176 - PRIMARILY THE SMALL LETTER SET. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC 
LINE FEED AFTER EVERY RECEIVED CARRIAGE RETURN, THERE WILL 
BE A BLANK LINE BETWEEN EACH PRINTED LINE. 
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EXAHPLt: 

lit 



1 1 1 


AAA 


AAA 


t If 1 


DDD 
DDD 


DDD 


mmm 


f f r 


f f r 




VVV 


UUU 


*A* 


c c c 
etc 


c c c 
etc 


999 

ill 


etc 
r r r 


c c c 
r r r 




cr.c, 
uuu 


t < < 
\ \ \ 


nnn 


uuu 


\ ^ ^ 
If) 


111 
111 


111 
111 


1 1 1 


1 1 1 
J J J 


1 1 1 
J J J 


4 4 4 






» • * 


1 1 1 


1 1 1 
LLL 




MMM 

nnn 


MMM 

nnn 


• • • 


NNN 


MMM 


III 
III 


nnn 
uuu 


nnn 
uuu 


000 


PPP 


PPP 

r r r 


111 

1 1 1 




000 
UUU 


222 

C k k 


RRR 


RRR 


J J J 


J ^ J 


J J <9 


444 


TTT 


TTT 


555 


UUU 


UUU 


666 


VVV 


VVV 


777 


WUU 


UUU 


888 


XXX 


XXX 


999 


YYY 


YYY 




III 


III 


« r # 


CCL 




«< 


\\\ 






]]] 




>» 






??? 







6.1.3 TEST 2 - NON-PRINTABLE CHARACTER TEST 

THIS TEST CHECKS ALL NON-PRINTABLE CHARACTERS THAT HAVE NO CONTROL 
FUNCTION IN THE LA36 TERMINAL OR THE LA36 OPTIONS (SUCH AS CR. LF. BS. 
& BEL). FIRST THE ASCII CODE UILL BE PRINTED FOLLOUEO BY THE MNEMONIC 
AFTER A FEU SEPARATING SPACES. FOLLOUING THE MNEMONIC, THE ACTUAL 
CONTROL CHARACTER UILL BE SENT THREE TIMES AND NOTHING SHOULD HAPPEN 
AT THE PRINTER. THIS PATTERN IS REPEATED, THREE TIMES ON A LINE, 
UNTIL ALL OF THE NON-PRINTING CHARACTERS HAVE BEEN TESTED. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY RECEIVED CARRIAGE RETURN, THERE UlLL BE A BLANK LINE 
BETUEEN EACH PRINTED LINE. 
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499 
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501 
502 
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463 


000 


NUL 


001 


SOH 


002 


SIX 


464 


006 


ACK 


020 


OLE 


021 


DC1 


465 


022 


DC2 


023 


0C3 


024 


DC4 


466 


025 


NAK 


026 


SYN 


027 


ETB 


467 


030 


CAN 


031 


E« 


032 


SUB 


468 


034 


FS 


035 


GS 


036 


RS 


469 


037 


US 


177 


DEL 







6.1.4 TEST 3 - CARRIAGE RETURN TEST 

THIS TEST CHECKS THE CARRIAGE RETURN FROM ALL EVEN NUMBERED 
AND THE SPACING OF THE SOLENOID HEAD FROM THE LEFT MARGIN. IT 
A GOOD CHECK FOR PROPER OPERATION OF THE POSITION DECODER. 



COLUMNS 
IS ALSO 



THE TEST PRINTS A FULL LINE OF ALTERNATING O'S AND SPACES, STARTING 
WITH A 0. AT THE END OF THE LINE THE PRINT HEAD IS RETURNED TO THE 
LEFT MARGIN WITH A CARRIAGE RETURN. THE SPACES ARE THEN FILLED IN BY 
SPACING THE PRINT HEAD OUT FROM THE LEFT MARGIN TO THE FIRST SPACE. 
PRINTING AN "X", AND EXECUTING A CARRIAGE RETURN. THIS PATTERN IS 
REPEATED UNTIL THE LINE IS COMPLETED. CHECK TO SEE THAT ALL X'S ARE 
IN THE MIDDLE OF THE SPACE BETWEEN THE TWO ZEROES ON EITHER SIDE OF 
IT. 



EXAMPLE; 



OXOXOXOXOXOXOXOXOXOXOXOXOXOXOX 



WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY RECEIVED CARRIAGE RETURN, THIS TEST WILL PRINT A LINE OF 
O'S AND SPACES, THEN PRINT A DIA6INAL LINE OF X'S. TO CORRECTLY CHECK 
THE ENCODER, THE AUTO LINE FEED OPTION SHOULD BE DISABLED. 



EXAMPLE; 



0 0 0 0 0 
X 

X 

X 

X 



0 0 0 0 



SEO 0012 
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511 

512 

515 

5U 

515 

516 

517 

518 

519 

520 

521 

522 

525 

52<. 

525 

526 

527 

528 

529 

550 

551 

552 

555 

55A 

535 

556 

537 

558 

559 

5A0 

5A1 

5A2 

5A5 

544 

545 

546 

547 

548 

549 

550 

551 

552 

555 

554 
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6.1.5 TEST 4 - MULTIPLE LINE FEED TEST 



THIS TEST CHECKS THE LINE FEED CAPABILITY OF THE PRINTER BY SENDING 
VARIOUS GROUPS OF LINE FEEDS INTERSPACED WITH REFERENCE LINES. THE 
NUMBER PRINTED AS THE REFERENCE LINE INDICATES THE NUMBER OF LINE 
FEEDS THAT FOLLOW. THE FIRST AND LAST LINES ALSO CONTAIN A STRINb OF 
DASHES AS REFERENCE POINTS FOR MEASURING, THE TOTAL DISTANCE IS 63(10) 
LINES BETWEEN THE TWO DASHED LINES. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY CARRIAGE RETURN. THt NUMBER PRINTED WILL INDKATE ONE LESS 
THAN THE NUMBER OF LINE FEEDS (THE NUMBER OF BLANK LINES) THAT FOLLOW. 
THE TOTAL DISTANCE BETWEEN THE TWO DASHED LINES WILL THEN BE 69 LINES. 



EXAMPLE! 



01- 
02 

04 



08 



16 



32 



00- 



15 BLANK LINES 



51 BLANK LINES 
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556 
557 

558 6.1.6 TEST 5 - SINGLE LINE FEED TEST 
559 

560 THIS TEST IS DESIGNED TO CHECK THE TIMING OF SINGLE LINE FEEDS AND THE 

561 CAPABILITY OF DOING LINE FEEDS IN ALL COLUMNS. TWO REFERENCE LINES 

562 ARE USED BY THIS TEST (AND TEST 6) WHICH ALSO CAN BE USED TO EASILY 

563 CHECK THE NUMBER OF COLUMNS THE PRINTER IS PRINTING. 
56A 

565 THE FIRST REFERENCE LINE CONTAINS 130(10) ZEROES FOLLOWED BY TWO 2'S 

566 IF TESTING 132(10) COLUMNS. IF LESS THAN 132 COLUMNS, THE LINE 

567 WILL CONTAIN O'S FOR TWO LESS THAN THE MAXIMUM NUMBER OF COLUMNS 

568 FOLLOWED BY THE TWO 2'S. THIS REFERENCE LINE IS A QUICK CHECK 

569 FOR 132(10) COLUMNS IF TESTING THE FULL 132(10) COLUMNS. THE SECOND 

570 REFERENCE LINE PRINTS A STRING OF NUMBERS (1 TO 9 i 0 ) REPEATED TO 

571 THE MAXIMUM COLUMN. THIS LINE, AGAIN, CAN BE USED AS A QUICK CHECK OF 

572 THE NUMBER OF COLUMNS. 
573 

574 THE LINE FEED TEST IS ACCOMPLISHED BY: PRINTING THE FIRST REFERENCE 

575 LINE OF O'S AND TWO 2'S; THEN EITHER SENDING 60(10) 3'S. IF 

576 TESTING 132(10) COLUMNS, OR WAITING 1.8 SECONDS FOR AN LCV, IF TESTING 

577 LESS THAN 132(10) COLUMNS. IF TESTING 132(10) COLUMNS, NOTHING 

578 SHOULD HAPPEN, EXCEPT FOR AN LCV, AT THE END OF THE LINE. THE 3'S 

579 SHOULD BE LOST AND NEVER PRINTED. AFTER THE LCV, WITH THE PRINT HEAD 

580 AT THE EXTREME RIGHT, A CARRIAGE RETURN - LINE FEED WILL BE SENT 

581 FOLLOWED BY REPEATED BACKSLASHES "\" AND LINEFEEDS TO PRINT A DIAGONAL 

582 LINE DOWN THE PAPER. WHEN A BACKSLASH IS PRINTED IN THE MAXIMUM 
585 COLUMN, A CARRIAGE RETURN WILL BE SENT IMMEDIATELY AFTER THE LINE FEED 

584 AND THE SECOND REFERENCE LINE OF SEQUENTIAL NUMBERS WILL BE PRINTED. 

585 AFTER COMPLETING THE LINE, A CARRIAGE RETURN - LINE FEED WILL BE SENT 

586 AND THE PROGRAM WILL WAIT ONE SECOND FOR THE CARRIAGE RETURN FUNCTION 

587 TO COMPLETE. AFTER THE DELAY, THE REFERENCE LINE WILL BE REPEATED, 

588 THE LAST LINE BEING GUARANTEED TO BE CORRECT. ANY TIMING PROBLEMS 

589 DURING THE LINE FEEDS WILL SHOW AS MISS PRINTS OR MISSING CHARACTERS 

590 DURING THE FIRST 16(10) CHARACTERS OF THE MIDDLE REFERENCE LINE. 

591 ALSO, ANY PAPER FEED PROBLEMS WILL CAUSE MISS-ALIGNMENT OF THE SLASHES 

592 FORMING THE DIAGONAL LINE. 
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III P*GE K 

595 

596 EXAMPLE : 

597 

598 000000000000000000000000000022 

599 \ 

600 \ 

601 \ 

602 \ 
605 \ 

604 \ 

605 \ 

606 \ 

607 \ 

608 \ 

609 \ 

610 \ 

611 \ 

612 \ 
615 \ 

614 \ 

615 \ 

616 \ 

617 \ 

618 \ 

619 \ 

620 \ 

621 \ 

622 \ 
625 \ 

624 \ 

625 \ 

626 \ 

627 \ 

628 \ 

629 125456789012545678901234567890 
650 125456789012545678901254567890 
651 
652 
655 
654 
655 

656 WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 

637 AFTER EVERY RECEIVED CARRIAGE RETURN, THERE WILL BE A BLANK LINE EVERY 

638 PLACE A CARRIAGE RETURN IS EXECUTED. 
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659 

6A0 

6A1 

6^2 

6^3 

6^4 

645 

6A6 

6<t7 

6A8 

6A9 

6S0 

651 

652 

655 

65<. 

655 

656 

657 

658 

659 

660 

661 

662 

665 

664 

665 

666 

667 

668 

669 

670 

671 

672 

673 

674 

675 

676 

677 

678 

679 

680 

681 

682 

683 

684 

685 

686 

687 

688 

689 

690 

691 

692 

693 

69A 
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1234567890 
1234567890 

6.1.7 TEST 6 - BACKSPACE TEST 

THIS TEST IS DESIGNED TO TEST THE PRINT TIMING AS IN TEST 5 AS WELL AS 
THE BACKWARD AND FORWARD nOVEHENT OF THE PRINT SOLENOID HEAD. 

THE TEST CONSISTS OF THE SAME FIRST REFERENCE LINE AS IN TEST 5 THEN 
A CARRIAGE RETURN>LlNE FEED. A FULL LINE IS THEN PRINTED USING THE 
FOLLOWING PATTERN: 



FORWARD SLASH 
BACKSPACE 
BACK SLASH 



THIS PATTERN PRODUCES A LINE OF ALL X'S. THE TWO SLASHES SHOULD CROSS 
EXACTLY AT THE MIDDLE. PRODUCING THE X CHARACTER. WHEN THE LINE IS 
COMPLETED A CARRIAGE RETURN-LINE FEED IS SENT AND THE LAST TWO 
REFERENCE LINES ARE PRINTED AS IN TEST 5. ANY TIMING PROBLEMS WILL 
SHOW IN THE FIRST 16(10) CHARACTERS OF THE MIDDLE REFERENCE LINE; 
AGAIN AS IN TEST 5. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY RECEIVED CARRIAGE RETURN, THERE WILL BE A BLANK LINE 
BETWEEN EACH PRINTED LINE. 



EXAMPLE: 



000000000000000000000000000022 
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
125456789012345678901254567890 
125456789012545678901254567890 
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695 

696 

697 

698 

699 

700 

701 

702 

703 

70^ 

705 

706 

707 

708 

709 

710 

711 

712 

715 

7U 

715 

716 

717 

718 

719 

720 

721 

722 

723 

724 

725 

726 

727 

728 

729 

750 

751 

732 

735 

75A 

755 

736 

757 

758 

759 

740 
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6.1.8 lEST 7 - OVERPRINT TEST 



SEQ 0017 
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THIS TEST IS DESIGNED TO CHECK THE SPACING AND REPEATABLE PRINTING 
CHARACTERISTICS OF THE PRINTER. THREE ROWS OF CHARACTERS ARE EACH 
OVERPRINTED TWO TIMES. THE ROUS CONSIST OF THE FOLLOWING CHARACTERS 
ALTERNATED ACROSS THE LINE: 



ROW 1 
ROW 2 
ROW 5 

THE RESULTING PATTERN 
OVERPRINTED CHARACTERS 
CHARACTERS. 



n-SP 
SP-* 
8-SP 

WILL BE A CHECKERBOARD PATTERN AND THE 
SHOULD BE ALIGNED PROPERLY WITH THE INITIAL 



EXAHPLE; 



&&&&&&&&&&&&&&& 



WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY RECEIVED CARRIAGE RETURN, THE LINES WILL NOT BE 
OVERPRINTED. THERE UILL BE THREE LINES OF EACH CHARACTER WITH A BLANK 
LINE BETWEEN EACH GROUP OF CHARACTERS. THE CHARACTERS IN EACH GROUP 
SHOULD BE IN THE SAME COLUMNS. 



EXAMPLE: 



MMHMMMMMMM 
HMHMMHMMMM 
MMMMHMMMMH 

+ + 4 + + + + 

444444444 
444444444 

&&&&&&&&&& 
&&&&&&&&&& 
&&&&&&&&&& 
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742 
7^,5 

7A3 

746 

747 

748 

749 

750 

751 

752 

753 

754 

755 

756 

757 

758 

759 

760 

761 

762 

765 

764 

765 

766 

767 

768 

769 

770 

771 

772 

775 

774 

775 

776 

777 

778 

779 

780 

781 

782 

783 

784 

785 

786 

787 

788 

789 

790 

791 

792 

795 

794 

795 

796 



HACY11 50A(1052) 



F 2 

05-AUG-79 09:23 PAGE M 



SEO 0018 



PAGE 17 



6.1.9 TEST 10 - PRINTING FREQUENCY SWEEP TEST 



THIS TEST PRINTS THE CHARACTER "H" REPEATEDLY. 30(10) CHARACTERS PER 
LINE FOR FOUR LINES. DURING THE FIRST TWO LINES, THE TIME INTERVAL 
BETWEEN CHARACTERS IS INCREASED FROH 30(10) HILLISECONDS TO 1.8 
SECONDS USING THE FOLLOWING FORMULA TO CREATE A LOGRITHHIC INCREASE: 

NEW DELAY = OLD DELAY ♦ OLD DELAY/16 ♦ OLD DELAY/128 

THE LAST TWO LINES 00 JUST THE REVERSE. THE TIME INTERVAL BETWEEN 
CHARACTERS IS DECREASED FROM 1.8 SECONDS TO 30(10) MILLISECONDS 
USING THE FOLLOWING FORMULA TO AGAIN CREATE A LOGRITHMIC DECREASE: 

NEW DELAY = OLD DELAY - OLD DELAY/16 - OLD DELAY/128 

LOOK FOR POSSIBLE MISS-ALIGNMENT OF THE CHARACTERS OR SPACES BETWEEN 
CHARACTERS AS AN INDICATION OF TIMING PROBLEMS. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY RECEIVED CARRIAGE RETURN, THERE WILL BE A BLANK LINE 
BETWEEN EACH PRINTED LINE. 



EXAMPLE: 



HHHHHHHHHHHHHHHHHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHHHHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHHHHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHHHHHHHHHHHHHHHHH 



6.1.10 TEST 11 - RIBBON FEED TEST 



THIS TEST CHECKS THE RIBBON FEED MECHANISM BY PRINTING A SINGLE COLUMN 
OF 24 LINES OF X'S DOWN THE LEFT HAND MARGIN OF THE PAGE. VISUALLY 
CHECK FOR PROPER OPERATION OF THE RIBBON FEED MECHANISM DURING THIS 
TEST. 



WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE 
AFTER EVERY RECEIVED CARRIAGE RETURN. THERE WILL BE A BLANK 
BETWEEN EACH PRINTED LINE. 



EXAMPLE: 

X 
X 
X 
X 
X 
X 
X 



FEED 
LINE 
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797 

798 

799 

800 

801 

802 

803 

80^ 

805 

806 

807 

808 

809 

810 

811 

812 

813 

814 

815 

816 

817 

818 

819 

820 

821 

822 

823 

824 

825 

826 

827 

828 

829 

830 

831 

832 

833 

834 

835 

836 

837 

838 

839 

840 

841 

842 

843 

844 

845 

846 

84 7 

848 

849 

850 

851 

852 
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6.1.11 TEST 12 - PRINTER BELL TEST 



THIS TEST CHECKS THE PRINTER BELL BUFFER TO INSURE THAT EIGHT BELLS 
ARE DISTINCTLY HEARD, EVEN WHEN SENT AT THE MAXIMUM TRANSFER RATE. 
THE PROGRAM SENDS 8 BELL CODES AT THE MAXIMUM RATE TO THE PRINTER 
THEN WAITS 2.5 SECONDS TO ALLOW THE OPERATOR TO HEAR THE BELLS. 



6.1.12 TEST 17 - LIFE TEST 

THIS TEST RUNS CONTINUOUSLY AND IS RUN AS AN INDIVIDUAL, SPECIAL TEST, 
IT IS NOT PART OF 'HE STANDARD PRINTING TEST SEQUENCE. 

THIS TEST PRINTS 2 LINES OF EACH PRINTABLE CHARACTER AND THEN REPEATS 
CONTINUOUSLY. THE SECOND LINE OF EACH CHARACTER IS OVERPRINTED 4 
TIMES TO CONSERVE PAPER. AT THE END OF EACH COMPLETE PASS THROUGH THE 
CHARACTER SET A MESSAGE IS PRINTED INDICATING THE NUMBER OF PASSES 
EXECUTED. IF ANY CHARACTER (EXCEPT "RUBOUT") IS TYPED ON THE KEYBOARD 
DURING THIS TEST. THE PATTERN WILL CHANGE AND RESTART WITH THE TYPED 
CHARACTER. THIS WILL ONLY HAPPEN IF KEYBOARD CONTROL IS IN USE. 



EXAMPLE: 



AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
BBBBBBBBBBBBBBBBBBBBBBBBBBBBBB 
BBBBBBBBBBBBBBBBBBBBBBBBBBBBBB 



IF THE AUTO LINE FEED OPTION IS SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY RECEIVED CARRIAGE RETURN. THE TEST WILL PRINT SIX LINES OF 
EACH CHARACTER WITH A BLANK LINE BETWEEN THE FIRST AND SECOND LINES AS 
WELL AS BETWEEN EACH GROUP OF CHARACTERS. 



EXAMPLE; 



AAAAAAAAAAAAAAA 

AAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAA 

BBBBBBBBBBBBBBe 

BBBBBBBBBBBBBB6 
BBBBBB66BB6BBBB 
BBBBBBBBBBBBBBB 
B6BBBB6BB6BBBBB 
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8S3 BBBBBBBBBBBBBBB 
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855 

856 

857 

858 

859 

860 

861 

862 

865 

864 

865 

866 

867 

868 

869 

870 

871 

872 
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874 

875 

876 

877 

878 

879 

880 

881 

882 

885 

884 

885 

886 

887 

888 

889 

890 

891 

892 

895 

894 

895 

896 

897 

898 

899 

900 

901 

902 

905 
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THESE TESTS ARE DESIGNED AS A TEST OF THE KEYBOARD AND AN AID IN 
ISOLATING TROUBLES WITHIN THE TERMINAL. AT THE BEGINNING OF EACH 
TEST. THE TEST NUMBER WILL BE PRINTED INDICATING WHICH TEST IS BEING 
EXECUTED. TYPING A "RUBOUT" OR "DELETE" AT ANY TIHE. WHETHER IN 
KEYBOARD CONTROL OR NOT. WILL EXIT THE CURRENT ECHO TEST AND PRINT A 
TEST TERMINATION MESSAGE. IF IN KEYBOARD CONTROL. THE SELECT TEST 
MESSAGE WILL BE PRINTED AND THE PROGRAM WILL AWAIT A TEST SELECTION AS 
USUAL. IN SWITCH REGISTER CONTROL, THE PROGRAM WILL HALT (AT SELLHLT) 
WAITING FOR CONTROL VIA THE SWITCH REGISTER. A DETAILED DESCRIPTION 
OF EACH TEST FOLLOWS: 



6.2.1 TEST 20 - CHARACTER ECHO TEST 

THIS TEST IS DESIGNED TO OPERATE THE TERMINAL IN A 
MODE. ANY CHARACTER TYPED ON THE KEYBOARD (EXCEPT A 
ECHOED TO THE PRINTER. 



SIMULATED LOCAL 
'RUBOUT") WILL BE 



6.2.2 TEST 21 - LINE ECHO TEST, FAST RATE 

THIS TEST CONTINUALLY SENDS FULL LINES Of ANY CHARACTER UP TO THE 
MAXIMUM COLUMN WIDTH. THE TEST PRINTS A "0" CHARACTER WHEN STARTED 
UNTIL A KEY IS TYPED ON THE KEYBOARD. THE PROGRAM WILL THEN SEND THE 
TYPED CHARACTER UNTIL ANOTHER CHARACTER IS TYPED OR THE TEST IS 
TERMINATED BY TYPING A "RUBOUT". THE CHARACTERS ARE TRANSMITTED AT 
THE MAXIMUM RATE WITH A CARRIAGE RETURN-LINE FEED INSERTED AFTER EVERY 
132(10) PRINTABLE CHARACTERS. 

IF THE LA56 IS IN HALF DUPLEX WHEN RUNNING THIS TEST, CHARACTERS MAY 
BE LOST OR GARBLED WHENEVER A CHARACTER IS TYPED ON THE KEYBOARD. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY CARRIAGE RETURN, THERE WILL BE A BLANK LINE BETWEEN EACH 
PRINTED LINE. 



6.2.3 TEST 22 - LINE ECHO TEST, SLOW RATE 

THIS TEST IS IDENTICAL TO TEST 21 EXCEPT A DELAY OF 1.8 SECONDS IS 
INSERTED BETWEEN EACH CHARACTER TO ALLOW THE PRINT HEAD TO PERFORM AN 
LCV BETWEEN CHARACTERS. 
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90A 

905 

906 

907 

908 

909 

910 

911 

912 

915 

9U 

915 

916 

917 

918 

919 

920 

921 

922 

925 

924 

925 

926 

927 

928 

929 

950 

951 

932 

935 

954 

955 

956 

957 

958 

959 

940 

941 

942 

945 

944 

945 

946 

947 

948 

949 

950 

951 

952 

955 

954 

955 

956 

957 

958 

959 
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6.2.4 TEST 25 - CHARACTER/CODE ECHO TEST 

THIS TEST WILL PRINT THE OCTAL CODE RECEIVED BY THE PROCESSOR FOLLOWED 
BY THE CHARACTER OR THE NMEHONIC OF THE CHARACTER EVERY TIME A KEY IS 
PRESSED ON THE KEYBOARD. THE PARITY OF THE RECEIVED CODE WILL BE 
INDICATED AS EITHER ODD OR EVEN. ALLOW SUFFICIENT TIME BETWEEN 
CHARACTERS FOR THE LINE TO BE PRINTED. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EVERY RECEIVED CARRIAGE RETURN. THERE WILL BE A BLANK LINE 
BETWEEN EACH PRINTED LINE. 



EXAMPLE: 



501 


A 


ODD 


265 


5 


ODD 


215 


CR 


EVEN 


240 


SP 


EVEN 



6.2.5 TEST 24 - SELECTED PATTERN ECHO TEST 

THIS TEST IS DESIGNED TO GIVE MAINTENANCE THE FLEXIBILITY TO CHOOSE 
THEIR OWN PATTERNS FOR ISOLATING ANY SPECIFIC PROBLEMS WHICH MAY ARISE 
IN THE FIELD. 

TYPE ANY CHARACTERS (EXCEPT CONTROL-C AND RUBOUT) AND EACH CHARACTER 
WILL BE ECHOED AS TYPED. A MAXIMUM OF 256(10) CHARACTERS MAY BE 
INPUTTED. NO CARRIAGE RETURNS OR LINE FEEDS ARE INSERTED BY THE 
PROGRAM. ALL CHARACTERS MUST BE INPUTTED BY THE OPERATOR. TO 
TERMINATE THE INPUT STRING TYPE A CONTROL-C. THE PROGRAM WLL THEN 
CONTINUALLY ECHO THE INPUTTED PATTERN. TO STOP THE PRINTING. TYPE 
CONTROL-C. THE PROGRAM WILL STOP PRINTING THE PATTERN AND WILL WAIT 
FOR EITHER ANOTHER PATTERN INPUT TERMINATED BY A CONTROL-C. OR THE 
SAME PATTERN HAY BE USED AGAIN BY TYPING CONTROL-C. TO EXIT THE TEST 
AT ANY TIME. TYPE A "RUBOUT". 



WI'EN ANY OPTIONS ARE AVAILABLE. 
CHARACTER SEQUENCES ARE SELECTED. 



6.2.6 TEST 25 - BELL ECHO TEST 



BE CAREFUL WHAT CHARACTERS OR 



THIS TEST IS DESIGNED TO TEST THE BELL ON COLUMN 64 IF TYPING HAS 
OCCUREO ON THE LINE. THE TEST PRINTS A MESSAGE: 



TYPE ANY PRINTABLE CHARACTER AND LISTEN FOR BELL 



AFTER THE TEST MESSAGE IS PRINTED. TYPE ANY PRINTABLE CHARACTER ON THE 
keyboard: the character will be ECHOED AND THE BELL SHOULD RING. THE 



SEQ 0022 
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960 MESSAGE MILL THEN BE TYPED AGAIN. TtPE THE "RUBOUT" KEY TO TERMINATE 

961 THE TEST AT ANY TINE. 
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962 

965 

964 

965 

966 

967 

968 

969 

970 

971 

972 

975 

97<. 

975 

976 

977 

978 

979 

980 

981 

982 

985 

984 

985 

986 

987 

988 

989 

990 

991 

992 

995 

994 

995 

996 

997 

998 

999 
1000 
1001 
1002 
1005 
1004 
1005 
1006 
1007 
1008 
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THESE TESTS ARE DESIGNED AS A TEST OF THE VARIOUS OPTIONS IN WHATEVER 
COMBINATIONS THEY ARE AVAILABLE IN THE LA56. AT THE BEGINNING OF EACH 
TEST, THE TEST NUMBER WILL BE PRINTED INDICATING WHICH TEST IS BEING 
EXECUTED. TYPING A "RUBOUT" OR "DELETE" AT ANY TIHE. WHETHER IN 
KEYBOARD CNTROL OR NOT. WILL EXIT THE CURRENT OPTION TEST. A DETAILED 
DESCRIPTION OF EACH TEST FOLLOWS: 



6.5.1 TEST 50 - SECONDARY CHARACTER SET OPTION 

THIS TEST IS DESIGNED TO TEST THE SECONDARY CHARACTER SET OPTION. 
TESTING THE ABILITY TO SELECT EITHER CHARACTER SET UNDER SOFTWARE 
CONTROL FROM THE CPU AND PRINTING THE CORRECT CHARACTERS WITHIN EACH 
CHARACTER SET. 

A NUMBER IS PRINTED AT THE LEFT MARGIN INDICATING WHICH CHARACTER SET 

15 BEING PRINTED, #1 INDICATES THE PRIMARY SET AND 02 INDICATES THE 
SECONDARY SET (APD. AFTER THE NUMBER. THE APPROPRIATE SHIFT IN (SI) 
OF SHIFT OUT (SO) WILL BE SENT FOLLOWED BY THE ENTIRE PRINTABLE 
CHARACTER SET. IF LESS THAN 98 COLUMNS ARE BEING TESTED. A CARRIAGE 
RETURN - LINE FEED WILL BE INSERTED IN THE APPROPRIATE PLACES. THIS 
WILL BE REPEATED, ALTERNATING BETWEEN PRIMARY AND SECONDARY SETS UNTIL 

16 LINES HAVE BEEN PRINTED (IF USING 98 OR MORE COLUMNS). THERE WILL 
BE A BLANK LINE BETWEEN EACH PAIR OF LINES TO SEPARATE EACH GROUPING. 
CHANGE LOCATION "T50SC" AT THE END OF TEST50 TO 577 (8) IF USING 8 BIT 
SELECTION CODE RATHER THAN THE SI AND SO TO SELECT CHARACTER SETS. 
THE TEST WILL THEN SET OR CLEAR BIT 8 INSTEAD OF SENDING THE SI OR SO 
TO SELECT CHARACTER SETS. 

WITH THE AUTO LINE FEED OPTION SET TO PRODUCE AN AUTOMATIC LINE FEED 
AFTER EACH RECEIVED CARRIAGE RETURN. THERE WILL BE EXTRA BLANK LINES 
EVERY PLACE A CARRIAGE RETURN IS SENT. 



EXAMPLE: 



#1= r'mi'O PRIMARY CHARACTER SET.. 

#2= :"I$M'C) SECONDARY CHARACTER SET, 



#1 = 
#2= 



:"#tX8*C) PRIMARY CHARACTER SET., 

'."ISXg'O SECONDARY CHARACTER SET, 
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1009 

1010 

1011 

1012 

1015 

10U 

1015 

1016 

1017 

1018 

1019 

1020 

1021 
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1024 
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1026 

1027 

1028 

1029 

1030 

1051 

1032 

1035 

1054 

1055 

1056 

1037 

1038 

1059 

lOAO 

1041 

1042 

1045 

1044 

1045 

1046 

1047 

1048 

1049 

1050 

1051 

1052 

1053 

1054 

1055 

1056 

1057 

1058 
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6.3.2 TEST 31 - SELECTIVE ADDRESSING OPTION 



SEO 0025 
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THIS TEST IS DESIGNED TO TEST THE VARIOUS FUNCTIONS Of THE SELECTIVE 
ADDRESSING OPTION. THE TEST FIRST SENDS AN "EOT" <004> TO DISABLE ALL 
TERMINALS AND TRIES TO PRINT AN ERROR MESSAGE. THE ERROR MESSAGE 
SHOULD NOT BE PRINTED ON ANY TERMINAL WITH THE SELECTIVE ADDRESSING 
OPTION. THEN A "BEl" <007> AND "STX" <002> ARE SENT TO SELECT ALL 
TERMINALS. AT THIS POINT THE TEST NUMBER IS PRINTED ON ALL TERMINALS. 
THUS. IF AN ERROR MESSAGE IS PRINTED BEFORE THE TEST NUMBER. THE EOT 
DID NOT DE-SELECT THE TERMINAL WHERE THE MESSAGE WAS PRINTED. 

THE TEST NEXT SENDS AN EOT DIRECTLY FOLLOWED BY A STX, WITH NO SELECT 
CHARAACTER. AGAIN, THE ERROR MESSAGE IS SENT TO ALL TERMINALS. WHICH 
SHOULD NOW BE ALL DE-SELECTED. THE ERROR MESSAGE SHOULD NOT BE 
PRINTED ON ANY TERMINAL WITH THE SELECTIVE ADDRESSING OPTION. 

THE NEXT SERIES OF CHECKS ARE MADE ON THE GROUP SELECT CHARACTER. A 
TABLE LOCATED AT THE END OF TEST 31 IN THE LISTING IS USED TO TEST 
VARIOUS GROUP SELECT CHARACTERS. THE FIRST ZERO ENCOUNTERED IN THE 
TABLE WILL INDICATE THE END OF THE TABLE AND THE TEST WILL 60 TO THE 
NEXT SERIES OF CHECKS ON THE OPTION. THE TABLE IS PRESET WITH A 
SINGLE GROUP SELECT CHARACTER, THE LETTER "G", BUT ALLOWS ROOM TO TEST 
UP TO 8 DIFFERENT SELECT COOES. THIS TABLE SHOULD BE CHANGED TO 
CONTAIN THE VARIOUS GROUP SELECT CHARACTERS DESIRED TO TEST WITH ONE 
ASCII CODE PER LOCATION. THE TEST WILL THEN USE THE VARIOUS GROUP 
SELECT CHARACTERS TO SELECT TERMINALS AND PRINT A MESSAGE ON EACH 
SELECTED TERMINAL INDICATING THE GROUP SELECT CHARACTER USED. CHECK 
THAT THE CORRECT GROUP SELECT CHARACTER HAS ENABLED EACH TERMINAL. 
ALSO. IT HAY BE HELPFUL TO PLACE ;UNUSED SELECT CHARACTERS IN THE 
TABLE TO CHECK THAT THEY DO NOT SELECT TERMINALS. IF AN ERROR MESSAGE 
WAS PRINTED BETWEEN THE TEST NUMBER AND THE GROUP SELECT MESSAGE. THE 
TERMINAL WHERE THE MESSAGE WAS PRINTED WAS SELECTED BY AN EOT AND STX 
WITH NO SELECT CHARACTER BETWEEN THEM. 

THE LAST SERIES OF CHECKS ARE MADE ON THE UNIQUE SELECT CHARACTER. A 
TABLE LOCATED AT THE END OF TEST 51 IN THE LISING IS USED TO TEST 
VARIOUS UNIQUE SELECT CHARACTERS. THE FIRST ZERO ENCOUNTERED IN THE 
TABLE WILL INDICATE THE END OF THE TABLE. THE PROGRAM WILL SELECT ALL 
TERMINALS USING THE BEL CODE BEFORE EXITING THE TEST. THE ^TABLE IS 
PRESET WITH A SINGLE UNIQUE SELECT CHARACTER. THE LETTER "U". BUT 
ALLOWS ROOM TO TEST UP TO 16 DIFFERENT UNIQUE SELECT CODES. THIS 
TABLE SHOULD BE CHANGED TO CONTAIN THE VARIOUS UNIQUE SELECT 
CHARACTERS DESIRED TO TEST. WITH ONE ASCII CODE PER LOCATION. MAKE 
SURE THAT EACH CHARACTER IN THE TABLE IS A VALID UNIQUE SELECT CODE OR 
THE DIAGNOSTIC WILL HANG DURING THIS PORTION OF THE TEST. USING EACH 
UNIQUE SELECT CHARACTER IN TURN. THE TEST WILL PERFORM THE REMAINING 
CHECKS OF THE SELECTIVE ADDRESSING OPTION. 
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THE TEST WILL SEND AN EOT FOLLOWED BY THE CURRENT UNIQUE SELECT 
CHARACTER. BEFORE THE STX IS SENT, THE TEST WILL TRt TO PRINT THE 
ERROR MESSAGE ON ALL TERMINALS. THEN THE STX WILL BE SENT AND A 
MESSAGE WILL BE PRINTED TO INDICATE THE UNIQUE SELECT CHARACTER USED. 
CHECK THAT THE CORRECT UNIQUE SELECT CHARACTER HAS ENABLED EACH 
TERMINAL. IF AN ERROR MESSAGE IS PRINTED BEFORE THE UNIQUE SELECT 
MESSAGE, THE TERMINAL WHERE THE MESSAGE WAS PRINTED WAS ENABLED BEFORE 
THE STX WAS RECEIVED. A MESSAGE WILL THEN BE PRINTED TELLING THE 
OPERATOR TO TYPE ANY PRINTABLE CHARACTER TO CHECK THAT THE KEYBOARD IS 
ENABLED. WHATEVER CHARACTER IS TYPED WILL BE ECHOED TO THE TERMINAL. 

THE FINAL SECTION OF THE TEST WILL USE A DUMMY SELECT CHARACTER. THE 
ASCII CODE FOR THIS SELECT CHARACTER IS LOCATED BETWEEN THE TWO SELECT 
CHARACTER TABLE AT THE END OF THE TEST THIS LOCATION SHOULD CONTAIN 
THE ASCII CODE OF ANY UNUSED SELECT CHARACTER. THE TEST WILL SEND AN 
EOT FOLLOWED BY THE DUMMY SELECT CHARACTER AND AN STX. THE ERROR 
MESSAGE WILL BE LOADED TO ALL TERMINALS AND SHOULD NOT BE PRINTED ON 
ANY TERMINALS SINCE ALL SHOULD BE DE-SELECTED. NEXT AN ETX <003> 
FOLLOWED BY THE CURRENT UNIQYUE SELECT CHARACTER AND AN STX WILL BE 
SENT AND A PRINTED MESSAGE WILL INDICATE THE SELECT CHARACTER USED. 
ANOTHER EXT WILL BE SENT, FOLLOWED BY THE DUMMY SELECT CHARACTER AND 
AN STX THIS TIME. A MESSAGE WILL AGAIN BE PRINTED INDICATING THE 
CURRENT UNIQUE SELECT CHARACTER. ALL SELECTED TERMINALS SHOULD REMAIN 
SELECTED AND NO OTHER TERMINALS SHOULD GET SELECTED. 



6.3.3 TEST 32 - ANSWER BACK OPTION 

THIS TEST IS DESIGNED TO TEST THAT THE ANSWER BACK OPTION SENDS THE 
CORRECT MESSAGE UPON RECEIPT OF AN ENQ (005) OR UPON TYPING CONTROL -E 
OR THE HERE IS KEY ON THE KEYBOARD. THE TEST WILL SEND AN ENQ (005). 
READ THE MESSAGE, AND THEN PRINT OUT THE MESSAGE ON THE LA36. THE 
TEST WILL THEN ASK THE OPERATOR TO DEPRESS THE HERE IS KEY, READ THE 
MESSAGE, AND THEN PRINT OUT THE MESSAGE. FINALLY, THE TEST WILL TELL 
THE OPERATOR TO DEPRESS THE CONTROL-E KEY, READ THE MESSAGE. AND PRINT 
OUT THE MESSAGE. IF THE SELECTIVE ADDRESSING OPTION IS AVAILABLE, THE 
AUTO ANSWER BACK OPTION WILL NOT RESPOND TO ANOTHER ENQ AFTER THE 
FIRST ONE RECEIVED. THUS. YOU MAY HAVE TO DEPRESS THE RUBOUT KEY TO 
EXIT THE TEST. 
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1112 

1113 

11K 

1115 

1116 

1117 

1118 

1119 

1120 

1121 

1122 

1125 

1124 
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1126 

1127 

1128 

1129 

1150 

1151 

1152 

1133 
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1135 

1136 

1137 
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1159 
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1141 

1142 
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1144 

1145 

1146 

1147 

1148 

1149 

1150 

1151 

1152 

1153 
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6.3.4 TEST 55 - TOP Of FORH OPTION 



THIS TEST IS DESIGNED TO TEST THE FORN FEED CAPIBlLlTY OF THE TOP OF 
FORM OPTION. A SET OF INSTRUCTIONS IS PRINTED FOR THE OPERATOR TO 
REMIND Hin TO DEPRESS THE TOP OF FORH RESET SWITCH AFTER MAKING EACH 
SWITCH SETTING. UPON COMPLETION OF EACH SETTING. AFTER DEPRESSING THE 
RESET SWITCH. TYPE ANY CHARACTER (EXCEPT RUBOUT) ON THE KEYBOARD TO 
TEST THAT SWITCH :>TTING. THE REFERENCE LINES PRINTED WILL INDICATE 
THE LENGTH FORM FEED JUST EXECUTED AND THE NEXT SWITCH SETTING TO 
HAKE. THE 5 INCH FORM FEED IS TESTED TWICE BEFORE TESTING THE 
REMAINING POSITIONS. THE FIRST TIME. 16 OR 17 LINE FEEDS ARE EXECUTED 
BEFORE DOING THE FORM FEED, DEPENDING ON HOW THE AUTO LINE FEED OPTION 
IS SET UP. THE DIAGNOSTIC WILL THEN TEST EACH POSITION IN SEQUENCE 
FROM 5 TO 14 INCHES. THE SINGLE STEP POSITION IS NOT CHECKED. 



6.5.5 TEST 34 - HORIZONTAL TAB OPTION 

THIS TEST CHECKS THE ABILITY TO SET A TAB IN EVERY COLUMN AND AT 
PREDETERMINED INTERVALS. AS WELL AS THE ABILITY TO CLEAR ALL TABS. 
THE PROGRAM SETS A TAB IN THE PREDETERMINED COLUMN, DOES A BACKSPACE. 
AND PRINTS AN "0". AFTER THE LINE IS PRINTED AND THE TABS ARE SET. A 
CARRIAGE RETURN IS SENT AND THEN THE PRINT HEAD IS POSITIONED USING 
TABS AND X'S ARE PRINTED OVER THE O'S. SINCE THE FIRST LINE OF THE 
TEST SETS A TAB IN EVERY COLUMN. THE PRINT HEAD IS TABED ACROSS THE 
PAGE TWICE TO TEST ALL TABS. THE FIRST PASS CHECKS THE EVEN NUMBERED 
COLUMNS WHILE THE SECOND PASS CHECKS THE ODD NUMBERED COLUMNS. THE 
TEST SETS TABS IN EVERY COLUMN. EVERY OTHER COLUMN, AND EVERY 4, 8, 
16, 52. 64. 128, % 152 COLUMNS. ALL HORIZONTAL TABS WILL BE CLEARED 
AT THE END OF THE TEST IF THE TEST IS RUN TO COMPLETION. IF A RUBOUT 
IS USED TO EXIT THE TEST BEFORE COMPLETION. THE TABS WILL STILL BE 
SET. 



EXAMPLE: 



0000000000 
0 0 0 0 0 
0 0 
0 



WHEN THE AUTO LINE FEED OPTION IS SET UP TO PRODUCE AN AUTOMATIC LINE 
FEED AFTER EVERY RECEIVED CARRIAGE RETURN, THERE WILL BE A BLANK LINE 
BEFORE EACH REFERENCE LINE OF O'S AND THE X'S WIL BE PRINTED ON THE 
NEXT LINE UNDER THE O'S. THE FIRST LINE OF O'S WILL HAVE 2 LINES OF 
X'S UNDER IT. THE FIRST HAVING X'S IN ALL EVEN NUMBERED COLUMNS AND 
THE SECOND HAVING X'S IN ALL ODD NUMBERED COLUMNS. 
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000000000000 
X X X X X X 
X X X X X X 

0 0 0 0 0 0 
X X X X X X 

0 0 0 
XXX 

0 
X 



6.3.6 TEST 35 - VERTICAL TAB OPTION 

THIS TEST CHECKS THE VERTICAL TAB OPTION BY TESTING THE ABILITY TO SET 
TABS IN VARIOUS POSITIONS OF A 14 INCH FORM. AN INSTRUCTION IS 
PRINTED TELLING THE OPERATOR TO SET A 14 INCH FORM LENGTH AND DEPRESS 
THE TOP OF FORR RESET SWITCH. WHEN READY, TYPE ANY CHARACTER (EXCEPT 
RUBOUT) ON THE KEYBOARD TO CONTINUE. THE TEST WILL SEND LINE FEEDS, 
SET TABS, AND PRINT REFERENCE LINES WHEREVER A TAB IS SET. AT THE END 
OF THE FORM. A MESSAGE WILL INDICATE TO EITHER REMOVE THE REFERENCE 
PAGE (WITHOUT TOUCHING THE KEYBOARD) OR RESET THE FIRST REFERENCE 
LINE. TO RESET THE REFERENCE PAGE IN THE PRINTER, OPEN THE PAPER 
TRACTORS AND PLACE THE FIRST REFERENCE LINE INFRONT OF THE PRINT HEAD. 
WHEN READY TO CONTINUE, TYPE ANY CHARACTER (EXCEPT RUBOUT) ON THE 
KEYBOARD. THE TEST WILL THEN REPRINT THE REFERENCE LINES, USING THE 
TABS INSTEAD OF LINE FEEDS TO ADVANCE THE PAPER. IF THE FIRST 
REFERENCE PAGE WAS REMOVED, HOLD IT AGAINST THE SECOND REFERENCE PAGE 
TO CHECK FOR PROPER PAPER ADVANCING USING TABS. IF THE REFERENCE PAGE 
WAS RESET IN THE PRINTER. THE SECOND SET Of REFERENCE LINES SHOULD 
HAVE PRINTED DIRECTLY OVER THE FIRST SET EXCEPT ON THE FIRST LINE 
WHERE THEY SHOULD BE SIDE-BY-SIDE. ALLOW FOR A SLIGHT VARIANCE IN 
PAPER POSITION WHEN CHECKING THAT THE REFERENCE LINES ARE CORRECT. 
LOOK FOR FULL LINE DIFFERENCES. THE TEST PRODUCES 
0.1.2,3.4.5.6.7.8,9, ft 10 BLANK LINES BETWEEN THE REFERNECES LINES, IN 
THAT ORDER. 
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EXAMPLE: 



■«««« 
-«««« 

■«««« 
-«««« 

■«««« 



•«««« 



FIRST REF. LINE UITH TABS 



•«««« 



THE REFERENCE PATTERN PRODUCED WILL BE DIFFERENT 
OPTION IS SET UP TO PRODUCE AN AUTOMATIC 
RECEIVED CARRIAGE RETURN. THERE WILL. IN FACT, 
BETWEEN EACH REFERENCE LINE DUE TO THE AUTO LINE 



IF THE AUTO LINE FEED 
LINE FEED AFTER EVERY 
BE ONE EXTRA LINE 
FEED. 



EXAMPLE; 



■<«<«« 
-<««<« 

-«««« 
-«<««< 



•«««« 



■«««« 



.TITLE CZLAODO LA56 OHil/DJil DIAG 



C2LADD0 LA56 
CZLADO.Pll 

12H 

1256 

1257 

1258 

1259 

1260 

1261 

1262 

1265 

126^ 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1275 

127A 

1275 

1276 

1277 

1278 

1279 

1280 

1281 

1282 

1285 

128^ 

1285 

1286 

1287 

1288 

1289 

1290 

1291 

1292 

1295 

1294 

1295 

1296 

1297 

1298 

1299 

1500 

1501 

1502 

1505 

1504 

1505 

1506 

1507 

1508 

1509 
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:LA56 TERMINAL DIAGNOSTIC 
:DH11 AND DJ11 INTERFACES 



.•AUTHOR: ROBERT U. BAKER 

.•COPYRIGHT 1974.1979. DIGITAL EQUIPMENT CORP.. WAYNARD. MASS. 01754 
.SBTTL SWITCH REGISTER OPTIONS 



SEQ 0050 



SWITCH POSITION 



15 
15 
8 

00 
00 



UP (1) 
DOWN (0) 



UP (1) 
DOWN (0) 



UP (1) 
DOWN (0) 



07 
05 



FUNCTION 

HALT AT END OF CURRENT TEST 
CONTINUE NORMAL TEST SEQUENCE 



DRIVE ONLY SELECTED TERMINAL 
DRIVE ALL TERMINALS 



SELECT TEST (AT START UP ONLY) 
START NORMAL TEST SEQUENCE 

* OF COLUMNS AT START-UP 

« OF TEST SELECTION 



1.— 



.SBTTL SPECIAL OPERTIONAL NOTES 



BEFORE START UP REFER TO THE DESCRIPTION OF THE ROUTINE "DLY* 
TIMING IS A FUNCTION OF THE PDP11 MODEL AND MEMORY TYPE AND 
SHOULD BE SET UP BEFORE RUNNING THE DIAGNOSTIC. 



2.— THE DIAGNOSTIC WILL NOT RUN UNLESS THE ELTAB TABLE IS MANUALLY INITIALIZED. 



5.— ECO TABLE 

CHGD1 - 5 ADDITIONAL EMT ROUTINES 
CHGD2 - ADDED DEFINITIONS 

CH6D5 - NEW START UP PROCEDURE ALLOWS ENTERING SOFT SWITCH REG 
CHGD4 - FLAG FOR CHECKING "G FROM KEYBOARD 

CHGD5 - PREVIOUS DEPO TO ADD 4 FILL CHARACTERS AFTER EA CARRIAGE RET 
CHGD6 - PART OF DEPO ON 4 FILL CHARACTERS 
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1 510 








1512 




1515 




1 514 




1 51S 




1516 




1 51 7 




1 518 




1 519 




1 520 




1521 


000000 


1 522 


000001 


1525 


000002 


152A 


000003 


1525 


000004 


1 526 


000005 


1527 


000006 


1528 - 


000007 


1 529 


177776 


1550 




1331 




1532 




1355 




1 35A 




1335 


000001 


1 336 


000002 


1337 


000004 


1358 


000010 


1339 


000020 


1340 


000040 


13A1 


000100 


1342 


000200 


1 345 


000400 


1344 


001000 


1345 


002000 


1 346 


004000 


1347 


010000 


1348 


020000 


1349 


040000 


1350 


100000 


1351 




1552 


000000 


1353 


022626 


1354 


000200 


1355 


005726 



CH6D7 - ADDED SdCSWR ROUTINE TO CHECK SWITCH REGISTER. PRINTOUT 

CONTENTS. ENTER NEW DATA TO SWITCH REGISTER 
CHG08 - NEW PRINT MESSAGES FOR *G ADDITION 

CHGD9 - EXTENSION OF CHGD3. WAIT AND SEE IF ANY DH OR DJ DEVICES 
CHGD10 > FLAG FOR CHECKING *G DURING PRINT OPERATION 



.SBTTL EQUATES 



REGISTER EQUATES 

RO=XO 
R1=I1 
R2=X2 
R3=X3 
R4=X4 
R5=X5 
SP=X6 
PC=X7 

PSW=1 77776 



SYSTEM EQUATES 

BIT0=1 

B1T1=2 

BIT2=4 

B1T3=10 

BIT4=20 

BIT5=40 

B1T6=100 

BIT 7=200 

Bn8=400 

B1T9=1000 

BIT10=2000 

BITl 1=4000 

B1T12=10000 

BIT 13=20000 

BIT 14=40000 

BIT 15=1 00000 

OPEN=0 
P0PSP2=22626 
ACRLF=200 
P0PSP=5726 



;P0P STACK TWICE 
.-POP STACK ONCE 
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0 3 
PAGE 



'2 



T556 

15S7 

1558 

1559 

1560 

1561 

1562 

1565 

156A 

1365 

1566 

1567 

1568 

1569 

1570 

1571 

1372 

1575 

1374 

1575 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1385 

1584 

1585 

1386 

1387 

1388 

1389 

1590 

1591 

1592 

1393 

1394 

1595 

1596 

1597 

1598 

1599 

1400 

1401 

1402 

1405 

1404 

1405 

1406 

1407 

1408 

1409 

1410 

1411 



000000 
000002 



000004 



000050 
000052 



000046 
000052 
000174 



104000 
104001 
104002 
104005 
104004 
104005 
104006 
104007 
104010 
104011 
104012 
104015 
104014 
104015 
104016 
104017 
104020 
104021 
104022 
104023 
104024 
104025 



PROGRAH TRAP EQUATES 



TYPE=EB1»0 

CHA1N=E«T»1 

TYPEH=E«T»2 

0ELAY=EHT*5 

TTYCTL=Et»T*4 

TTYJTL=E«T»5 

CRLF=EHT*6 

SCRLF=EHT*7 

LF=EHT*10 

PR1NTC=EHT*11 

PRTMDR=E«T*12 

READ=£«T*15 

CR=EHT*14 

BT0ASC=EHT+15 

F0RWD=EHT*16 

CLEAN=EnT*17 

TESTC=EHT*20 

ECH0=EHT*21 

INRDY=EHT*22 

FOUR=EHT*23 ;CMG01 

CICSUR=EHT*24 

CNTLU=EHT*25 

.SBTTL TRAP CATCHER ft STARTING ADDRESSES 







.ENABL 
.ENABL 


000000 




.=0 


000000 
000000 




HALT 
HALT 


000004 


MACHER: 


.=4 


000030 




.=30 


003546 
000540 




EHTINT 

540 


000046 




.=46 


010740 




LOGICAL 


000052 




. = 52 


010000 




010000 


000174 




. = 174 


000000 


0ISPRE6 





ABS 
AHA 



.-ENABLE ABSOLUTE ADDRESSING 



.UORD 



.-SOFTWARE DISPLAY REG 
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K12 

K15 

KU 

K15 

K16 

U17 

K18 

K19 

K20 

K21 

K22 



000176 000000 



000200 000157 001276 
00020<. 000137 001266 



001100 
001100 000000 
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ADDRESSES 



SUREG: .WORD 
: STARTING ADDRESSES 



SPBOT ; 



J HP 
JHP 



.=1100 
0 



START 
START1 



.SOFTyARE SWITCH REGISTER 



;RUN DHll TESTS 
;RUN DJil TESTS 



:BOTTOn OF STACK 
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1 *♦ J J 
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uuuuuu 
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1 M jO 
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uuuuuu 






TFMPTH ■ 

1 tPir • 


nPFN 
urc n 




nni 1 PA 

UU 1 1 CO 


nnnnnn 

uuuuuu 






PAR I T V • 

r ill. 


nPFM 
ur c IV 


1 *♦ JO 
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nPFN 
urc n 


1 *♦ JT 
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nPFM 
ur c H 
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UU 1 I JO 


1 6on?n 
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O L o • 


160020 

1 UwwbW 


1 LLP 


nn 1 1 

Uv 1 1 HU 


160n?2 
1 ouucc 








160022 

1 UWWb b 


1 iLT 


nni 1 l7 

UU 1 1 He 


1 An024 






I PR • 

urn* 


160024 

1 Wwb^ 


1 


nni 1 44 

V/O 1 1 HH 


1 6nn26 

1 OUUcO 






r ARA ' 


160026 


1 L^S 
1 HM J 


nni 1 46 

Uw 1 1 HO 


160050 

1 Uww Jw 






BYCR * 


160030 

1 WWW J w 


1 LLf\ 


nni 1 sn 

UU 1 I JU 


ifiOn^p 

1 V\J\J jc 






RAR • 


160032 

1 WWW Jb 


1 L.L7 


nni 1 sp 

UU 1 1 JC 








^ wH • 


160056 

1 Uww <Jw 




nni 1 S4 

UU 1 1 JH 


onoonn 

UwUUUV/ 






^ n 1 V n • 


OPFN 


1 LLQ 


nni 1 SA 

UU 1 1 JO 


noooon 

wwUwww 






1 IMP NO* 


WI 1 1» 


1 H 


nni i#>n 

UU 1 1 ou 


ooooon 






MASK ■ 

w^ • 


OPEN 

w r u i» 


1 J 1 


UU 1 1 OC 


000001 

wwwww 1 


000002 

W WWw b 


000004 

WWWWW" 


BIT TAB- 


1 2 4 


\H JC 


no 1 1 70 


000010 

wwww 1 w 


000020 

W W W W b w 


000040 

WW V 




10 20-40 

1 WfbWf^W 


1 LS^ 

1 H J J 


WW 1 1 r O 


0001 00 

www 1 WW 


000200 

WW W b WW 


000400 

WWW^ w w 




100 200.400 

1 WW 4bWW ^^wW 


1 ■♦ 


001 P04 

UU 1 tUH 


001 000 

WW 1 www 


002000 

WW b W WW 


004000 

W W~ WW w 




1000.2000.4000 

I www # bWWW /~WWW 


1 Z.SS 

I "* J J 


001 PI? 

WW 1 C 1 C 


010000 

w 1 wwww 


020000 

W b WW WW 


040000 




10000 20000 40000 

1 wwww fbVWwW ^tWVWW 




001 ??0 

WW 1 L C w 


100000 

1 WWWwW 








1 00000 


1 "t J r 


001P22 

WW 1 C b C 


000000 

www WW w 






ACTI V: 


OPEN 




001 224 

WW 1 C 


000000 

W W W WW w 






lOSU: 


OPEN 


1459 

1 "t y T 




000000 

w wwwww 






DJCNT : 


OPEN 




WW 1 C Jw 


000000 

w wwwww 






DHCNT : 


OPEN 




001252 

WW 1 b 


000000 

wwww WW 






SCRI : 


OPEN 


1 LA? 


nni 254 

UU 1 C JH 


000000 






SCR2: 


OPEN 


1 HO J 


001256 

UU 1 C JO 


160010 

1 Www 1 w 






CSR: 


160010 


1 HOH 


001 240 

UU 1 CHU 


160014 

1 Uww 1 






TCR: 


160014 


1 J 


001242 

UU 1 CH C 


160016 

1 Uww 1 %J 






TBUF : 


160016 




001244 

WW 1 t^"* 


1 77570 






SR: 


177570 


1 Lf\7 










•*•*«**** CH6D2 •tt«*t»« 


1 HOD 


001246 

WW 1 C^U 


1 77570 

1 f f ^ f w 






DISPLAY 


: 177570 


\ HOT 


001250 

WW 1 C > w 


000000 

w Www V 






TIB: 


OPEN 




001252 

W W 1 W 1^ k 


000000 

W w w w w w 






TEMPST: 


OPEN 


H71 


001254 


000000 

w w w w V w 






COUNT : 


OPEN 


U72 


001256 


000000 






FILL: 


OPEN 


U75 


001260 


000000 






MODE: 


OPEN 


K74 


001262 


000000 






CNT: 


OPEN 


J475 


001264 


000000 






TIMES: 


OPEN 


H76 










> 
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SEQ 0034 



NITIONS 



;1 MSEC COUNTER FOR ROUTINE "DElAy" 

.-CONSOLE TERMINAL CONTROL SWITCH 
:CONTAINS CURRENT TEST NUMBER 
;C0NTA1NS ADDRESS OF NEXT TEST 
.-CURRENT PAPER WIDTH, BINARY 
.-TEMP STORAGE FOR TESTS EO21tE022 
.•COUNTER FOR TEST ROUTINE "PT3" 
:ADDRESS OF CURRENT TEST 
;P0SITI0N COUNTER FOR TESTS E021tE022 
;TEHP STOR FOR ECHO TESTS 
:PARITY FLAG 

;CHAR CODE WITH PARITY BIT 

; COUNTER FOR TEST ROUTINE "PT4" 

; ADDRESS OF FIRST DHl 1 . (RECALCULATED) 

;SYSTEM CONTROL REGISTER 

;NEXT RECEIVED CHARACTER REG. 

:LINE PARAMETER REG 

:CURRENT ADDRESS REGISTER 

;BYTE COUNT REG 

.-BUFFER ACTIVE REG 

;SIL0 STATUS REG 

;N0. OF THE DHll UNDER TEST 

;N0. OF THE TERMINAL UNDER TEST 

.-MASK OF LINE NO. UNDER TEST 

:TABLE OF LINE NO. MASKS 



TEST ACTIVE INDICATOR 

=0,DH11 UNDER TEST— =1,DJ11 UNDER TEST 

COUNT OF DJirS ON BUS 

COUNT OF DHirS ON BUS 

TEMP STORAGE USED BY PRINTC 

TEMP STORAGE USED BY PTINTC 

DJil CONTROL STATUS REG 

DJ11TRANSMITTER CONTROL REG 

DJ11 TRANSMITTER BUFFER REG 

SW REG ADDRESS 

DISPLAY REGISTER 
TEMP KEYBD BUFFER STORAGE 
TEMP WORK LOCATION 
LOOP COUNT FOR TEST 
ZERO FILL SWITCH 
NUMBER OF DIGITS TO TYPE 
ITERATION COUNT 
COUNTER FOR ElTAB 



CZLADDO LA36 DhII/DjII 01A6 
CZLAOD.Pll 03-AUG-79 09:18 



mil 








1 H f O 
















1 LACt 








1 LA^ 

1 HO 1 








1 HOC 








1 HO J 








1 ••OH 








1 HO J 








1 HOV 








K87 


001266 


01 2757 

w 1 C r J f 


177777 

\ t t t t t 


H88 


001274 


000402 




U89 


001276 


005057 

WW J\i J * 


001224 

WW I t C H 


K90 








U91 


001 302 


012706 

W 1 k • WW 


001 100 

W W 1 'WW 


K92 


001 506 


013746 


000006 

W WW WWW 


K93 


001 312 


01 3746 


000004 


U94 








U95 


001 316 


012737 


001536 

WW I J J\0 


K96 


001324 

WW 1 -/ 1 » 


022771 


177777 


K97 


001332 

W W 1 ^ ^ 


001402 

W W 1 ~ W fc 




U98 


001334 


000407 

W W W ~ W ' 




K99 


001336 


022626 




1500 


001340 


012737 


0001 76 

www I 1 V 


1501 


001 346 


012737 


0001 74 


1502 


001354 


012637 


000004 


1503 


001360 


012637 


000006 


1504 


001364 


104017 




1505 


001566 


005037 


001104 


1506 


001372 


012737 


004216 


1507 









J 5 

HACTll 30A(1052) 03-AUG-79 09:23 PAGE ?5 
PROGRAH INITIALIZATION % CONTROL 

.SBTTL PROGRAM INITIALIZATION t CONTROL 



SEO OOSt. 



PROGRAM START 



001224 



000004 
177712 



001244 
001246 



000024 



START 1 : 


NOV 


1177777, lOSW 




BR 


STARTX 


START: 


CLR 


lOSW 


STARTX: 


nov 


KSPBOT.SP 




nov 


6,-{SP) 




HOV 


4.-(SP) 




CHGD5: 


nov 


«64S.ai4 




C«P 


1-1 ,asR 




BEQ 


65S 




BR 


66S 


64S: 


CMP 


(SP)+.(SP)* 


65$: 


MOV 


ISUREG.SR 




nov 


#DISPREG. DISPLAY 


66S: 


nov 


(SP)+,ai4 




nov 


(SP}«,ai6 


60S: 


CLEAN 






CLR 


CNTLSU 




nov 


IPFAIL.24 



;SET UP FOR OJll TEST 

;SET UP FOR OHll TESTS 

;SET STACK POINTER 
.-SAVE CURRENT VECTORS 



SET UP LOC 4 FOR NON-EXIS HEM TRAP 

REFERENCE HDUE SU REG 

IF IT = -l.USE SOFT SU REG 

THEN USE HDUE SWITCH REG 

CORRECT THE STACK. NO HDUE SU REG 

POINT TO SOFT SU REG 

.-POINT TO SOFT SU REG 
RESTORE VECTORS 
SAnE 

CLEAN UP 

INITIALIZE TERMINAL CONTROL SUITCH 
SET ADDR POUER FAIL ROUTINE 



CZLADDO LA36 
CZLAD0.P11 



K 3 
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?6 



SEO OOlf^ 



1508 






1S09 






1510 






1511 






1512 






1513 






15U 






1515 






1516 






1517 






1518 


001400 


012757 


1519 


001406 


A AC A 1 T 

005037 


1520 


001412 


rt 4 ^rt A 

012700 


1521 


001416 


rtrt C T 4 A 

005710 


1522 


001420 


rt^ ^ TArt 

062700 


1523 


001424 


rt A e T 7 

00^257 


152A 


001430 


AAA7 70 

000772 


1525 






1526 


001432 


022626 


1527 


001454 


A T A A ^ 7 

050027 


1 528 


001440 


AA 4 / A 

001402 


1529 


0O1442 


A ^ T A A 

062700 


1550 


001446 


A 4 A A T 7 

010057 


1551 


001452 


A 4 7 T 7 

012737 


1552 


001460 


AAC AT 7 

005057 


1533 


Art 4 J ^ / 

001464 


AAC 7 1 A 
005f 10 


153A 


001466 


\JOCfV\J 


1555 


Art 4 y 7 ^ 

001472 


AAC 1X7 

005257 


1536 


rtrt i 1 7^ 

001476 


AAA771 

00077^2 


1537 






1 538 


rtrt 1 c aa 

001 500 


0^£6^6 


1539 






1 540 






1 541 


001 jOc 


ATI 7T 7 


1542 


AA 1 C 1 A 

001510 


AA1 AAC 


1 5»»3 


AA1 C 1 ^ 


0 JC f 31 


1 ^LL 




oni 001 


1545 


001522 


000000 


1546 


001524 


022737 


1547 


001552 


001001 


1548 


001554 


104025 


1549 


001556 





;1H1S NEXT PART CHECKS THE PRESENCE Of DJil OR DHll 
;START1NG AT 776010. A MESSAGE WILL BE PRINTED ON 
;THE CONSOLE TERMINAL INDICATING THE NUMBER 
;PRESENT. THE PRINTER DIAGNOSTIC WILL ADDRESS EACH OF 
;THE TERMINALS IN THE SYSTEM 



001452 000004 

001226 

160010 

000010 
001226 



000010 

000010 
001154 

001500 000004 
001230 

000020 
001230 



1S: 

END5: 

IS: 
2S: 

END4 : 



000077 001230 CHGD9: 
000077 001226 



000176 001244 



20S: 
60S: 



MOV 


#END3.MACHER 


CLR 


DJCNT 


MOV 


#160010, RO 


TST 


(RO) 


ADO 


#10, RO 


INC 


DJCNT 


BR 


IS 


P0PSP2 




BIT 


RO.flO 


BEQ 


IS 


ADD 


«I10.R0 


MOV 


RO,DHADR 


MOV 


«IEND4,MACHER 


CLR 


DHCNT 


TST 


(RO) 


ADD 


#20, RO 


INC 


DHCNT 


BR 


2S 


PQPSP2 





BIT 

BNE 

BIT 

BNE 

HALT 

CMP 

BNE 

CNTLU 



#77, DHCNT 
20S 

#77, DJCNT 
20S 

«SWREG,SR 
60S 



INIT TIME OUT TRAP 
CLEAR DJil COUNTER 
ADDR Of FIRST DJil 
REF DJil 

SET RO TO NEXT DJil 
INCREMENT COUNT Of OJll'S 
TEST PRESENCE OF NEXT DJil 



STACK 

IS MULTIPLE OF 20 



POP 2 FROM 
CHECK IF RO 
SKIP IF YES 
MAKE RO FIRST DHl1 ADDR 
SAVE AS FIRST DHll ADDRES 
SET TIME OUT TRAP 
CLEAR COUNT OF DHll'S 
TEST IF DHll IS PRESENT 
YES. SET RO TO NEXT DHll 
INCREMENT COUNT OF DHll'S 
CHECK IF NEXT ONE IS PRESENT 

;POP 2 FROM STACK 



ANY DHirS PRESENT? 
IF YES. BRANCH 
ANY OJll'S PRESENT? 
IF YES. BRANCH 

NO DJil OR DHll AT ADDR 160010 OR 20 
IS SOFT SW REG SELECTED? 
IF NOT, SKIP OVER NEXT OPER 
SOFT SWITCH REG INPUT ROUTINE 



CZLADDO LA56 
CZLADD.Pll 



1S50 

1552 
1555 
155A 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
1562 
1565 
156A 
1565 
1566 
1567 
1568 
1569 
1570 
1571 
1572 
1575 
1574 
1575 
1576 
1577 
1578 
1579 
1580 
1581 
1582 
1585 
1584 



DHll/DJll 
03-AUG-79 



DiAO 
09:18 
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SEQ 0057 



001556 
001542 
001546 
001552 
001554 
001560 
001562 
001566 
001572 
001576 
001602 
001604 
001610 
001612 
001614 
001616 
001620 
001626 
001632 
001634 
001640 
001644 
001650 
001652 
001654 
001656 



017701 
042701 
020127 
101003 
020127 
101002 
012701 
010137 
012700 
012702 
104015 
005037 
000401 
000405 
104002 
017442 
012737 
005737 
001440 
013701 
012700 
012702 
104015 
104006 
104002 
017613 



177502 
177400 
000204 

000035 

000204 
001112 
017654 
000003 

001106 



000240 
001224 

001226 
017613 
000002 



001610 



;READ THE PAPER WIDTH, NUMBER OF COLUMNS. 
.-FROM SWITCH REGISTER POSITIONS 0-7. SAVE AND 
;C0NVERT TO 5 ASCII CHARACTERS. A WIDTH GT152 
;0R LT30 COLUMNS (DECIMAL) WILL BE ABORTED TO 152. 



IS: 

2$: 
51: 



4S: 
5S: 

6S: 



MOV 
BIC 
CMP 
BHI 
CMP 
BHI 
MOV 
MOV 
MOV 
MOV 

BTOASC 
CLR 
BR 
BR 

TTPEM 

STARTM 

MOV 

TST 

BEQ 

MOV 

MOV 

MOV 

BTOASC 
CRLF 
TtPEM 
DJllS 



aSR,Rl 

#1 77400. R1 

Rl.#204 

2$ 

Rl ,#55 
5S 

#204. Rl 
Rl .WIDTH 
#HDRO,RO 
#5,R2 

RTNNO 

5S 

6S 



#N0P,4$ 

lOSW 

10S 

DJCNT.RI 

#DJllS,RO 

#2.R2 



PUT (SR) INTO Rl 

SAVE ONLY BITS 0-7 

TEST NO. COLUMN GT152 

COLUMNS 6T152. DEFAULT TO 152 

CHECK IF NO. COLUMNS LT 30 

NOT lT 50 NOR GT 152 

COLUMNS LT 50 OR GT 152. DEFAULT 

SAVE NO. COLUMNS IN WIDTH 

ADDR TO STORE ASCII COLUMN VALUE 

DO A 5 CHAR. CONVERSION 

CONVERT NO. COLUMNS TO ASCII 

SET ROUTINE NO = 0 

PRINT TITLE FIRST TIME 

SKIP IT AFTER FIRST TIME 

PRINT DIAGNOSTIC HEADER 

TAKE OUT BRANCH INSTR 

CHECK IF DJ11 OR DHll UNDER TEST 

BRANCH IF DHll 

GET NUMBER OF DJll'S 

ADDR TO STOR ASCII CHAR 

NO. OF ASCII CHARS (=2) 

CONVERT TO ASCII 



; OUTPUT MESSAGE 



CZLADDO LA56 
CZLA0D.P11 



OHil/DJil 
05-AUG-79 



H 5 
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09:18 PROGRAM INITIALIZATION K CONTROL 



SEO 0058 



1585 




















1586 










; 










1587 










; START 


ALL DJll 


RECEIVER SCANNERS 




1588 










; 










1589 




















1590 




















1591 


001660 


012701 


160010 






NOV 


#160010, R1 


;ADDR OF FIRST DJll SCR 




1592 


001 66A 


015703 


001226 






NOV 


0JCNT,R5 


;N0, OF DJll TO R5 




1595 


001670 


001002 








BNE 


81 


;BRANCH IF COUNT IS NOT ZERO 




159A 


001672 


000000 






7$: 


HALT 








1595 


001674 


000776 








BR 


7$ 


;D0 NOT CONTINUE 




1596 


001676 


05271 1 


000010 




8S: 


BIS 


#10, (R1 ) 


; CLEAR HOS 




1597 


001702 


012700 


000005 




9S: 


nov 


#5,R0 


;DELAY TIME TO RO 




1598 


001706 


104005 








DELAY 








1599 


001 710 


051 127 


000020 






BIT 


(R1 ) .#20 


.•TEST IF CLEAR STILL BUSY 




1600 


001 7U 


001572 








BNE 


9$ 


:6RANCH IF BUSY 




1601 


001716 


052711 


000001 






BIS 


#1 , (R1 ) 


: START SCANNER 




1602 


001 722 


062701 


000010 






ADD 


#10, R1 


;AODR OF NEXT SCR 




1605 


001726 


005503 








DEC 


R5 


;D£C COUNT OF DJll 




160A 


001 750 


001562 








BNE 


8S 


;NOT ZERO, START NEXT ONE 




1605 


001 752 


00041 2 








BR 


4 4 A 

1 1$ 






1606 


001 734 


015701 


001250 




4 AA 

10S: 


HOV 


DHCNT ,R1 


;N0. OF DHl IS TO Rl 




1607 


001740 


012700 


01 7564 






NOV 


#DHl 1 S ,R0 


;AODR TO STORE ASCII CHAR 




1608 


001744 


012702 


000002 






HOV 


#2,R2 


;N0. OF CHAR TO CONVERT 




1609 


001 750 


104015 








BTOASC 




: CONVERT TO ASCII 




1610 


001 752 


104006 








CRLF 








161 1 


001754 


104002 








TVPEH 




; OUTPUT MESSAGE 




1612 


001 756 


01 7564 








DHl 1 S 








1615 


001 760 


052777 


AAA/ A A 

000400 


1 77256 


1 1»: 


n t T 

BIT 


#BIT8,aSR 


;CICECK IF WANT TEST SELECTION? 




16U 


001 766 


A A 4 A A / 

001004 








BNE 


1 ^» 


:BRANCH IF BIT 8 IS SET (YES) 




1615 


001 770 


A 4 1 7 T 7 

012757 


A A ^ C ^ A 

006560 


A A 4 4 1 A 

OOl 1 10 




BOV 


ifDTA kJVTCT 

Vr 1 1>,Na 1 9 1 


;STARTUP PRINTING TESTS 




1616 


001 776 


000451 








BR 


CHAINY 






161 7 


002000 


4 A / A A 1 

104002 






12>: 


T YPEn 




;TYPE SELECT TEST NO. MESSAGE 




1618 


002002 


A T A AA L. 

020066 
















4 ^ 4 n 

1619 


002004 


A A C ATT 

005037 


AA i 1 1 

001222 






CLR 


ACTIV 


:SET TEST ACTIVE STATE NOT ACTIVE 


1620 


AA *i A 1 A 

002010 


AAC 71 7 


AA1 0^/ 

0U1 £^4 






T CT 


lOSU 


:DH11 OR DJ11 




1621 


002014 


A A 4 / C T 

001453 








BEQ 


TTYIA 


;UA1T FOR TERMINAL CONTROL FROM 


DH11 


1622 


002016 


000436 








BR 


TTYJA 


:UAIT FOR TERMINAL CONTROL FROM 


DJll 


1623 




















1624 




















1625 










* 










1626 










* 










1627 










; CLEAN- 


-INITIALIZES POINTERS 


BEFORE ENTERING A TEST 














* 










1629 




















1650 




















1651 


002020 


012737 


000006 


000004 


SCLEAN: 


MOV 


l6,nACHER 


;SET UP MACHINE ERROR VECTOR 




1652 


002026 


005066 


000002 






CLR 


2(SP) 


: CLEAR PROCESSOR STATUS WORD 




1655 


002052 


000002 








RTI 




;RETURN 





00203A 
002034 

002036 
002044 
002046 
002052 
002054 
002056 
002060 



C2LADD0 LA36 
CZLA00.P11 



1634 

1635 

1636 

1637 

1638 

1659 

1640 

1641 

1642 

1643 

1644 

1645 

1646 

1647 

1648 

1649 

1650 

1651 

1652 

1653 

1654 

1655 

1656 

1657 

1658 

1659 

1660 

1661 

1662 

1663 

1664 

1665 

1666 

1667 

1668 

1669 

1670 

1671 

1672 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

1680 

1681 

1682 

1683 

1684 

1685 
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39 



SEO 0039 



002062 
002066 
002070 
002074 
002076 
002100 
002104 
002106 



002112 
002114 
002120 
002122 
002126 
002132 
002136 



104024 

032737 
001405 
005737 
001401 
104005 
104004 
022626 



005777 
100003 
113700 
000000 
104017 
012706 
104016 
000177 



022626 
005737 
001402 
000137 
004737 
004737 
000137 



:CHA1NN— THIS PORTION IS THE COmON RETURN 
FOR ALL TESTS. 



CHGD4 : 

CHAINN: CKSWR 



000001 001104 
001224 



177156 
001106 



001100 
1 77006 



001222 

002500 
003106 
003214 
002174 



1$: 
2t: 



BIT 

BEQ 

TST 

BEQ 

TTVJTL 

TTYCTL 

P0PSP2 



»1 .CNTLSU 
2t 
lOSU 
IS 



.-SEE IF A *6 HAS BEEN GIVEN 

;CHECK IF TERMINAL CONTROL 
:BRANCH IF NOT 
;DH11 OR DJil? 
.•BRANCH IF DHll 

.•WAIT FOR 0J11 TERMINAL CONTROL 
.-WAIT FOR DHll TERMINAL CONTROL 
; CORRECT STACK 



IF THE SR BIT 15 IS SET. THE CPU WILL HALT HERE WITH 
THE TEST NUMBER IN RO. PRESS CONTINUE TO 
RUN NEXT TEST 



CHAlNt: TST 
BPL 



1$: 



MOVB 

HALT 

CLEAN 

MOV 

FORUD 

JMP 



aSR .-CHECK SW REG. 

IS : BRANCH IF NO HALT 

RTNNO.RO : CURRENT TEST NUMBER TO RO 

; CLEAN UP 

#SPBOT.SP .-SET UP STACK POINTER 

.-SET UP VALUES FOR NEXT TEST 
aCURTST ;60 TO TEST 



;TTYJ— THIS ROUTINE IS USED WHEN THE DJllS' ARE UNDER 
: TEST, OTHERWISE THE COMMENTS AND INSTRUCTIONS ARE 

THE SAME AS FOR TTYl. 



TTYJ: 


P0PSP2 




TTYJA: 


TST 


ACTIV 




BEQ 


IS 




JMP 


TTYIG 


IS: 


JSR 


PC.SCANOJ 




JSR 


PC.SETDJ 




JMP 


TTYlB 



; CORRECT STACK 

;TEST IF ENTRY IS FROM A TEST 
.•BRANCH IF NOT 

.-LOOK FOR INPUT 

;SET TERMINAL AS CONSOLE 

:G0 TO CONTROL 



CZLAODO LA56 OHll/OJll DUG 
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1686 

1687 

1688 

1689 

1690 

1691 

1692 

1693 

169^. 

169S 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

170A 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

1712 

1713 

17K 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 

1725 

1724 

1725 

1726 

1727 

1728 

1729 

1730 

1731 

1732 

1733 

1734 

1735 

1736 

1737 

1738 

1739 

1740 

1741 
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SEO 0040 



TTTi— THIS ROUTINE IS USED WHEN THE DHll'S ARE UNDER TEST. IT PROCESSES 
THE RESPONSE TO THE MESSAGE "SELECT TEST NO.". THE RESPONSE 
HUST BE THE TWO DIGIT OCTAL TEST NO. FOLLOWED BY: 

"L" TO LOOP ON TEST 

"S" TO SEQUENCE ON TEST 

"." TO EXECUTE TEST ONCE 
ALL SPACES ARE IGNORED AND AN ILLEGAL INPUT WILL BE FLAGEO 
BY A "V AND THE RETYPING OF THE ABOVE MESSAGE. THE FIRST 
TERMINAL TO RESPOND IS THE TERMINAL UNDER TEST. ALL 
PRINTER TESTS WILL OUTPUT TO ALL TERMINALS IF SR BIT 13 IS = 1 
WHILE THE ECHO TESTS WILL RESPOND TO THE PRINTER UNDER TEST ONLY. 



002142 


022626 




TTYl : 


P0PSP2 


002144 


005737 


001230 


TTYlA: 


TST 


002150 


001002 






BNE 


002152 


000000 




1$: 


HALT 


002154 


000776 






BR 


002156 


005737 


001222 


2%: 


TST 


002162 


001146 






BNE 


002164 


004737 


002674 




JSR 


002170 


004737 


002750 




JSR 


002174 


042700 


177600 


TTYlB: 


BIC 


002200 


010037 


001 124 




MOV 


002204 


020027 


000040 


1t: 


CMP 


002210 


001002 






BNE 


002212 


104013 






READ 


002214 


000773 






BR 


002216 


012700 


000056 


21: 


MOV 


002222 


104003 






DELAY 


002224 


013700 


001124 




MOV 


002230 


104021 






ECHO 


002232 


i Ay A OA 






1 C 3 1 L 


002234 


000421 






BR 


002236 


010005 






MOV 


002240 


006305 






ASL 


002242 


006305 






ASL 


002244 


006305 






ASL 


002246 


104013 






READ 


002250 


020027 


000040 


5$: 


CMP 


002254 


001002 






BNE 


002256 


104013 






READ 


002260 


000773 






BR 


002262 


012700 


000056 


4$: 


MOV 


002266 


104005 






DELAY 


002270 


013700 


001124 




MOV 


002274 


104021 






ECHO 


002276 


104020 






TESTC 


002300 


000555 




11$: 


BR 


002302 


060005 






ADD 


002304 


104013 




5$: 


READ 


002306 


020027 


000040 


CMP 


002512 


001002 






BNE 



DHCNT 
2S 

IS 

ACTIV 

TTYIG 

PC.SCANOH 

PCSETERM 

#177600, RO 

RO.TEMPCH 

R0.I40 

21 

IS 

#50.. RO 
TEMPCH.RO 



IIS 

R0.R5 

R5 

R5 

R5 

R0,I40 
4$ 

3S 

#30.. RO 
TEMPCH.RO 



NO 

R0.R5 

R0.#40 
6S 



.•CORRECT STACK 

;BE SURE THAT THERE ARE DHll'S 
:BRANCH IF YES 

;D0 NOT CONTINUE 

;TEST IF ENTRY IS FROM A TEST 

.-BRANCH IF IT IS 

;L00K FOR INPUT 

;SET TERMINAL DATA 

.•SAVE ONLY CHAR 

;GET CHAR 

;CHECtC IF CHAR IS A SPACE 
.•BRANCH IF NOT 

.•SPACE, LOOP WAITING FOR NEXT CHAR 
;GOT ONE 

; DELAY FOR HALF DUPLEX 

;GET CHAR 
.-ECHO CHAR 
;G0 TEST CHAR 
; ERROR IN CHAR 

;0K. SAVE DIGIT IN R5, POS 5-5 



;G0 WAIT FOR NEXT CHAR 
;CHECK IF A SPACE 
;BRANCH IF NOT A SPACE 
:WAIT FOR CHAR 
;60T ONE, ECHO IT 
; DELAY FOR HALF DUPLEX 

;GET CHAR 

:ECHO CHAR 

:G0 CHECK CHAR 

; ERROR IN CHAR 

;0K,R5 IS NOW OCTAL TEST NO. 

:G0 WAIT FOR TERMINATOR 

;CHECK IF A SPACE 

: BRANCH IF NOT A SPACE 



CZLAOOO Iklb 
CZLA00.P11 
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^I 



SEQ 0(K1 



1742 


002314 


104013 








READ 


17A5 


002316 


000773 








BR 


17<.4 


002320 


012700 


000036 




6$: 


nov 


17AS 


002324 


104003 








DELAY 


1746 


002326 


013700 


001124 






«0V 


17A7 


002332 


104021 








ECHO 


1748 


002334 


042700 


000040 






BIC 


1749 


002340 


020027 


000114 






CHP 


17^0 


002344 


001413 








BEQ 


1751 


002346 


020027 


000123 






CMP 


1752 


002352 


001414 








BEQ 


1753 


002354 


021727 


001124 


000056 




CHP 


1754 


002362 


001124 








BNE 


1755 


002364 


012737 


000001 


001104 




nov 


1756 


002372 


000407 








BR 


1757 


002374 


012737 


004001 


001104 


7%: 


nov 


1758 


002402 


000403 






8t: 


BR 


1759 


002404 


012737 


000401 


001104 


MOV 


1760 


002412 


104017 






9S: 


CLEAN 


1761 


002414 


012706 


001100 






HOV 


1762 


002420 


010500 








HOV 


1765 


002422 


020027 


000040 






CMP 


1764 


002426 


103102 








BHIS 


1765 


002430 


020027 


000020 






CMP 


1766 


002434 


103406 








BLO 


1767 


002436 


020027 


000030 






CMP 


1768 


002442 


105003 








BHIS 


1769 


002444 


012757 


000001 


001104 


10S: 


MOV 


1770 


002452 


006300 






ASL 


1771 


002454 


016057 


003246 


001110 




MOV 


1772 


002462 


00U64 








BEQ 


1773 


002464 


104016 








FORUD 


1774 


002466 


012737 


000001 


001222 




MOV 


1775 


002474 


000177 


176420 






JMP 


1776 


002500 


017700 


1 76434 




TlrlG: 


MOV 


1777 


002504 


100040 








BPL 


1778 


002506 


010004 








MOV 


1779 


002510 


000300 








SUAB 


1780 


002512 


042700 


177760 






BIC 


1781 


002516 


020037 


001156 






CMP 


1782 


002522 


001366 








BNE 


1783 


002524 


010400 








MOV 


1784 


002526 


042700 


177600 






BIC 


1785 


002532 


020027 


000177 






CMP 


1786 


002536 


001360 






TTYlH: 


BNE 


1787 


002540 


012706 


001100 




MOV 


1788 


002544 


012757 


000001 


001104 




MOV 


1789 


002552 


012700 


000036 






MOV 


1790 


002556 


104003 








DELAY 


1791 


002560 


104002 








TYPEM 


1792 


002562 


020066 








nES63 


1793 


002564 


005037 


001222 






CLR 


1794 


002570 


005737 


001224 






TST 


1795 


002574 


001402 








BEQ 


1796 


002576 


000137 


002114 




1$: 


JMP 


1797 


002602 


000137 


002144 




JMP 



5t 

#30. .RO 

TEMPCH.RO 

)»BIT5.R0 

R0.#114 

7% 

R0.#123 
81 

TEMPCH.#56 
NG 

»] ,CNTLSU 
9t 

14001, CNTLSU 
9S 

«401,CNTLSU 

*SPBOT.SP 
R5,R0 
R0,»40 
NG 

R0,l»20 
lOi 

R0,I30 
10$ 

#1 .CNTLSU 
RO 

PRGTAB(RO) .NX 
NG 

#1,ACT1V 

aCURTST 

SNRCRA.RO 

TTYlL 
R0.R4 
RO 

1177760, RO 

RO.LINENO 

TTYIG 

R4,R0 

#1 77600. RO 

R0,#177 

TTYIG 

irSPBOT.SP 

»] .CNTLSU 

#50.. RO 



ACTIV 
lOSU 

li 

TTYJA 
TTY1A 



.•SPACE. WAIT SOME MORE 
;60T ONE . ECHO IT 
;OELAY FOR HALF DUPLEX 



;GET CHAR 
;ECHO CHAR 
; ALLOW LOWER 
;1S IT AN 
;6RANCH IF 
:N0. IS IT 
; BRANCH IF 
;N0. IS IT 
;N0. 
;SET 



YES 
AN "5 
YES 
A 

ERROROR 
BIT 0 ONLY 



CASE OR UPPER CASE 



IN CNTLSW 



;SET BITS 11 AND 0 

:SET BITS 8 AND 0 
; CLEAN UP 
:RESET SP 
.•TEST NO TO RO 

.•CHECK IF TEST NO. IS EQ OR GT 40 
'ERROR IF YES 

•CHECK IF THIS IS AN ECHO TEST 
.•BRANCH IF NOT 
.•OPTION TEST? 

.•ALLOW LOOP ON OPTION TEST 
;YES. FORCE TO ONE TIME ONLY 
.-TEST NO. • 2 
TST;AOOR OF TEST TO NXTST 
;BRANCH IF ILLEGAL TEST 
.•SET UP TEST PARAMETERS 
:SET TEST ACTIVE IND 
;60 TO TEST 

;TEST ACTIVE. CHECK INPUT FROM DHll 

.•BRANCH IF NO DATA 

;DATA. SAVE IT 

.•RIGHT JUSTIFY LINE NO. 

; CLEAR ALL BUT LINE NO. 

.•CHECK IF LINE NO. IS SAME AS TEST LINE 

;NOT SAME. SEE IF ANY MORE IN SILO 

aiNES ARE THE SAME. GET CHAR 

;SAVE 7 BITS OF CHAR 

.-CHECK IF A RUBOUT 

.-NOT A RUBOUT, SEE IF ANY MORE 

;RESET STACK 

;CLEAR BITS 11 AND 8 

;DELAY FOR HALF DUPLEX 

;OUTPUT MESSAGE 



;CLEAR TEST ACTIVE STATE 
;DJ11 OR DH11 ? 
:BRANCH IF DH11 
;WA1T FOR NEXT TEST FROM 
;WAIT FOR NEXT TEST FROM 



0J11 
DHll 



CZLADDO LA56 
CZLAOD.PII 



1798 

1799 

1800 

1801 

1802 

1805 

1804 

1805 

1806 

1807 

1808 

1809 

1810 

1811 

1812 

1815 

18U 

1815 

1816 

1817 

1818 

1819 

1820 

1821 

1822 

1823 

1824 

1825 

1826 

1827 

1828 

1829 

1850 

1851 

1852 

1855 

1854 

1855 

1856 

1857 

1858 

1859 

1840 

1841 

1842 

1845 

1844 

1845 

1846 



002606 
002614 
002616 
002620 
002626 
002650 
002654 
002640 
002642 
002646 
002650 



DHll/OJll 
05-AUG-79 

032757 
001 40 1 
000002 
032757 
001744 
000157 
012700 
104003 
112700 
104021 
000753 



002652 
002656 
002662 
002666 
002672 



002674 
002700 
002704 
002710 
002712 
002716 
002722 
002724 
002726 
002730 
002756 
002742 
002744 
002746 



013705 
012537 
012557 
010537 
000002 



013701 
005037 
013700 
005720 
010037 
017700 
100410 
005301 
001762 
062757 
005257 
000765 
010004 
000207 
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PROGRAM 


INITIALIZAUON t CONTROL 




004000 


001 104 


ntiL : 


BIT 


IBIT 1 1 .CNTLSU 


;CHECK IF LOOP ON TEST 








BEQ 


IS 


:BRANCH IF NO LOOP 








ATI 

RT 1 




;G0 LOOP ON TEST 


000400 


001104 


It: 


BIT 


'BlTo.CNTLSU 


.'CHECK IF LOOP ON ScUUcNCc 








BEQ 


TT Yl H 


: BRANCH IF NO 


002062 






JHP 


CHAINY 


:60 LOOP ON SEQUENCE 


000036 




NG: 




mtn on 


;DcLAt rOR HALF DUrLcX 








DELAY 






000077 






novB 


I77.ro 


; : TO TcBPCH 






ECHO 




;PRINT A ? 








BR 


TTtlH 


• TDv AfiAiki conn null 
2 1 N T AuM IN r Kun un 1 1 



001110 
001106 
001110 
001120 



001250 
001154 
001134 

001140 
176216 



000020 
001154 



FORWARD— THIS ROUTINE TRANSFERS THE 2 ARGUMENTS 
FROM THE TEST ROUTINE. THEY ARE; 

1- ROUTINE NUMBER 

2- ADDRESS OF NEXT TEST 



•*••*••••* 
SFORUD: MOV 

nov 
nov 
nov 

RTl 



NXTST,R5 ;ADDR OF NEXT TEST TO R5 

(R5)+.RTNN0 :GET NUMBER OF NEXT TEST 
(R5)*,NXTST ;GET ADOR OF FOLLOWING TEST 
R5.CURTST ;ENTRY POINT TO TEST IN CURTST 

.-EXIT 



SCANDH - ROUTINE TO SCAN DH CHANNELS LOOKING FOR INPUT 



001140 



SCANDH: 


MOV 


DHCNT.R1 


;COUNT OF DHll'S TO Rl 


CLR 


CNTDH 


;CLEAR DH11 POSITION COUNTER 




MOV 


DHADR.RO 


;ADDR OF FIRST OHl 1 TO RO 




TST 


(RO)* 


:ADDR OF NRCRA 




MOV 


RO.NRCSA 


;SET UP NRCRA ADDRESS 


IS: 


MOV 


SNRCRA.RO 


;GET NEXT CHAR FROM SILO 


BMI 


2S 


.•BRANCH IF DATA IS PRESENT 
;DECREHENT COUNT OF DHll'S 




DEC 


R1 




BEQ 


SCANDH 


; START OVER IF ALL DONE 




ADO 


I20.NRCRA 


.-SET UP ADDR FOR NEXT DHll 




INC 


CNTDH 


;INC DHll POSITION COUNTER 




BR 


It 


;60 CHECK NEXT DHll ON BUS 


2S: 


MOV 


R0.R4 


:SAVE LINE NO. AND CHAR 


RTS 


PC 


; RETURN 



CZLADOO LAS6 DHll/DJil DIAG 
CZLAOO.Pn 05-AU&-79 09:18 

18^7 
18^.8 
18A9 
18S0 
1851 
1852 
1855 

185A 002750 015701 001U0 

1855 00275^ 0057A1 

1856 002756 010157 001136 

1857 002762 022121 

'858 002764 010137 001U2 

1859 002770 005721 

1860 002772 010157 001U4 

1861 002776 005721 

1862 003000 010137 001 U6 
1865 005004 005721 

1864 003006 010137 001150 

1865 003012 022121 

1866 005014 010157 001152 

1867 003020 000300 

1868 003022 042700 177760 

1869 003026 010077 176104 

1870 005052 012701 016402 

1871 005036 005737 001154 

1872 003042 001405 

1875 003044 062701 000020 

1874 003050 005337 001154 

1875 005054 000770 

1876 005056 010057 001156 

1877 005062 006300 

1878 003064 060001 

1879 003066 011177 176050 

1880 005072 062700 001162 

1881 005076 011057 001160 

1882 005102 010400 

1883 003104 000207 
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SEO 0043 



;SETERH - THIS ROUTINE IS USED TO SET UP THE REGISTER ADDRESSES Of 
: THE TERMINAL CURRENTLY UNDER TEST. 



SETERM- 


MOV 


NRCRA R1 


GFT ADDR DF TIIRRFNT MRTRA 




TST 


- (R1 ) 


TAt ADDR nF ^TR 




MQtf 


RI.SCR 


STORE SCR ADDR 




CMP 


(D1)4 (Rl)* 
Rl.LPR 


ADD 4 




MOV 


STORE LPR ADDR 




TST 


( R 1 ) ♦ 


ADD 2 




MOV 


R1 .CARA 


STORE CARA ADDR 




TST 


(RD* 


ADD 2 




MOV 


R1 ,BYCR 


STORE BYCR ADDR 




TST 


(R1 )* 


,ADD 2 




MOV 


R1 .BAR 


STORE BAR ADDR 




CMP 


(R1 )♦, (R1 )♦ 


ADD 4 




MOV 


R1 ,SSR 


STORE SSR ADDR 




SUAB 


RO 


RIGHT JUSTIFY LINE NO. 




BIC 


#177760. RO 


;SAVE ONLY LINE NO. 




MOV 


RO.aSCR 


•SET UP SCR 




MOV 


IDHI 100. R1 


;6ET ADDR OF VP TABLE 


IS: 


TST 


CNTDH 


;CAL WHICH DHll IS UNDER TEST 




BEQ 


2t 


iBRANCH IF THIS IS THE ONE 




ADD 


#20. Rl 


;REPOSITION R1 IN VP TABLE 




DEC 


CNTOM 


;DEC DHll POSITION COUNTER 




BR 


IS 




2S: 


MOV 


RO.LINENO 


;SAVE LINE NO. 




ASL 


RO 


;CREATE POINTER TO TABLE 




ADD 


RO.Rl 


;ADD LINE NO. TO VP TAB PNTR 




MOV 


(RD.SLPR 


;PUT VP INTO LPR 




ADD 


#BITTAB,RO 


;CAL PNTR INTO LINE MASK TABLE 




MOV 


(RO),MAS(! 


;PUT LINE MASK INTO MASK 




MOV 


R4.R0 


;RESTORE LINE NO AND CHAR 




RTS 


PC 


;RETURN 



CZLADDO LA36 DHll/DJII DIAG 
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1884 








1885 








1886 








1887 








4 a a a 

1888 








1889 








1890 


003106 


A 4 T ^A 4 

01 3701 


A A 4 ^ ^ Z 

001226 


1891 


0031 12 


A A r A T "9 

005037 


AA 4 4 C* < 

001 154 


\ an ^ 

1892 


AAV 4 4^ 

0031 16 


A 4 T T A A 

012700 


4 ^ A A 1 ^ 

160012 


1893 


003122 


A 4 ^ 7 A T 

012703 


A 4 A ^ 

01 7402 


1894 


A A Y 1 Z 

005126 


A 4 1 A A t 

01 1002 




1895 


AA T 1 T A 

0031 30 


i A A / 1 A 

lOO'i 10 




1896 


A A 7 < T T 

0031 52 


AAC T A 1 

005501 




i Of\'7 

\o97 


AA TIT/ 

0031 3*» 


AA 1 7X. / 

001 ^64 




1898 


AA T 1 T^ 

0051 56 


A^ 7AA 

062^00 


AAAA 1 A 
00001 0 


1 899 


AA T 1 / T 

005142 


AAC 7 ^ Z 

005723 




1900 


AA X 1 / y 

005144 


AAC 1X7 
005«i5f 


AAl 1 C/ 

001 1 54 


1 OA 1 

1901 


AA T 1 C A 
0051 50 


AAA7iL.^ 
000^66 




1902 


AA TIC") 

0051 52 


A 1 A Ay 

01 0204 




1 VU5 


AAT 1 C/ 

0051 54 


AAAZAO 

00050^ 




1904 


AA T 1 CI. 

0051 56 


A/ ^ 7AT 

042^02 


1 777A.A 


1 905 


AAT 1^0 

0051 6^ 


A1 A0Z7 

01 <Jdif 


AAl 1 

001 1 jO 


1 AAA. 

1906 


AAl ^ 

005166 


AA^ ZA 0 

00650c 




1 OAT 

1 907 


AA T 1 7A 
0051 ^0 


AiL. 0 7A'5 


rtA 1 1 A D 

00 11 6c 


1 AAO 

1 908 


AA T 1 7/ 

0051 r 4 


A 1 1 Z 7 

01 1 Z5f 


A A 1 1 A A 

001 1 60 


1 AAA 
1 V09 


AAI5AA 

005c00 


AtZ71 Z 

055^1 5 


AAl 1 Art 

UU1 1 60 


1 O 1 A 

1910 


AAZ OAy 

005<:04 


AAl Z C 0 

001 55<: 




191 1 


AAZ OA^ 

005^06 


1 1 A/ AO 

1 1 040<: 






Art t5 1 rt 

0U5c 1 U 


ftrt 1 7Qn 
UU 1 f 50 




1 A1 T 


AAIO 1 0 

005£l c 


AAA0A7 

UOOcUf 




1914 








1 A 1 C 

191 3 








1916 








1 91 / 








1 A 1 0 

1910 








1 A 1 A 

1919 








1 AOA 

19^0 








1 yd 1 








1 A"^ ^ 

1922 








1 A '5 T 

1 9Z3 


AA X 0 1 y 

005C14 


A 1 AAZ 7 

01 005/ 


rtrti 1 Art 
OU 1 1 hO 


1 AOi 

1 9<:4 


AA T "5 A 


AAC 7/. rt 
005 f 




1 A C 


AA T 0 00 

005c<:<: 


A 1 rtrtZ 7 

01005/ 


rtrti 5 z*> 
001 c56 


1 A 0^ 


003226 


UddUdv 




1 yc f 


AATJTA 
00 JC JU 


rtl ArtZ7 

U 1 \J\Jji 




1928 


003234 


005720 




1929 


003236 


010037 


001242 


1950 


003242 
003244 


010400 




1951 


000207 
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SEO 004A 



SCANDJ - ROUTINE TO SCAN CHANNELS LOOKING FOR INPUT 



SCANDJ : 




r\ 1 r uT D 1 ■ 
DJLNI ,K 1 ; 


rAll&jT AC r\ 1 1 1 TA D1 

LUUN 1 Ur U J 1 1 1 U K 1 




CLr 


CN 1 UH , 


ri C4D DAC rAll4lTCD 




nUv 


M 1 Artrti 5 Drt 


*nr\D AC C1DCT Dcru QUCCCD TA Drt 

Al/UK Ur rlNol KcLV DUrrcK lU Ku 




nuv 


irc 1 T AD 

• t L 1 AB , K3 , 


Anno nc ci tab Tn ox 

HUUK ur CLIAD lU Rj 


1 c • 
1 « • 


nuv 


/ DA \ D7 


UC 1 KCLV Durrcn 




on i 


7* 

^* I 


rramtm if data 


c • • 


DC r 




un DATA DPr rniiMT of niii 




RF 0 
DC U 




^TART n\/FR IF All THFTrFn 




ADD 




Anf)R OF Vifti RRllF 

^Ul/Tl ur 111. A 1 nDUr 




1 d 1 


( RX) 4 


IMTRFMFNT Ft TAR PDINTFR 




INT 




INTRFMFNT PO^ milNTFR 




RR 


1 & 

1 9 




J9 • 


Mnv/ 

nuv 


R7 R(. 


fiFT rnMTFNT^ OF RRllF 






R2 






BIC 


#177760. R2 


SAVE ONLY THE LINE NO. 




HOV 


R2,LINEN0 


■SAVE LINE NO. 




ASL 


R2 


LINE N0.*2 




ADD 


#BITTAB.R2 


-CAL ADDR OF LINE MASK 




NOV 


(R2),nASK 


;SAVE LINE MASK 




BIT 


HASK.(R3) 


;CHECK IF LINE EXISTS 




BNE 


2S 


iBRANCH IF NOT 




novB 


R4.R2 


;RESTORE R2 WITH CHAR 




BEQ 


2t 


; BRANCH IF NULL 




RTS 


PC 


; RETURN 



SETDJ - THIS ROUTINE IS USED TO SET UP THE PARAMETERS 
FOR THE DJil TERHMINAL CURRENTLY UNDER TEST. 



SETDJ; 



MOV 
TST 
MOV 
CMP 
MOV 
TST 
MOV 
MOV 
RTS 



RO.NRCRA 

-(RO) 

RO,CSR 

{RO)*.(RO)+ 

RO.TCR 

(RO)* 

RO.TBUF 

R4.R0 

PC 



SAVE ADDR FOR READ I TTYlH 

CAL ADDR OF CSR 

ADDR OF CURRENT CSR 

CAL ADDR OF TCR 

SAVE ADDR OF CURRENT CSR 

CAL ADDR OF TBUF 

SAVE ADDR OF CURRENT TBUF 

GET CONTENTS OF RECV BUFFER AGAIN 

RETURN 
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G 4 
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CZtADD 


.P11 03-AUG-79 09:18 


TCCT AI\f\DCCC T 


1 ox 0 






CQT T 1 
. SB 1 1 L 










1 QIA 
1 7 JH 


003246 


006560 


ODr;TAQ- PTA 
rKU 1 AO • r 1 U 


1 QZQ 

1 Vjs 


003250 


006654 


DTI 

r 1 1 


1 750 


003252 


006756 


DT 3 

r 1 C 


1 73f 


003254 


007406 


PT ^ 

r 1 J 




003256 


007526 


PTZ. 


1 **57 


003260 


007704 


PT S 

r 1 J 


1 o/ n 


003262 


010110 


PT A 

r 1 O 




003264 


010272 


PT7 


1 Q/ D 
1 7*»C 


003266 


010504 


r 1 1 U 


1 7M J 


003270 


010642 


rill 


1 A 


003272 


010674 


PT1? 


1 Q/ ^ 
1 7*»5 


003274 


000000 


Ur CrI 


1 7*»0 


003276 


000000 


Ur C N 


1 Q/. 7 
1 7S f 


003300 


000000 


nPP M 


1 7H0 


003302 


000000 


Ur Cfl 


17H7 


003304 


010764 


PT 1 7 


1 7 JW 








1 75 1 


003306 


011126 


CUCv 


1 

1 75c 


003310 


011172 


cue 1 


1 73 3 


003312 


011244 


C \jCC 


1 75*» 


003314 


011550 


C UC J 


1 7 55 


003316 


012052 




1 Q^A 
1 750 


003320 


012656 


Fn25 

L Lie J 


1 75 f 


003322 


000000 


OPEN 


1 750 


003324 


000000 


Ur 


1757 








1 you 


003326 


012740 


1 Vol 


003330 


013122 




1 70c 


003332 


015740 


TEST32 


1 705 


003334 


014170 


TFST33 


1 70h 


003356 


014724 


TEST 54 


1 7W J 


003340 


015274 


TEST35 


1966 


005542 


000000 


OPEN 


1967 


003544 


000000 


OPEN 



SEO 0045 



SBHL TEST ADDRESS TABLE 



DATA PATH TEST 
PRINTER CHARACTER TEST 
NON-PRINTING CHARACTER TtST 
CARRIAGE RETURN TEST 
MULTIPLE LINE FEED TEST 
SINGLE LINE FEED TEST 
BACKSPACE TEST 
OVERPRINT TEST 

PRINTING FREQUENCY SWEEP TEST 
RIBBON FEED TEST 
PRINTER BELL TEST 
SPARE FOR ADDITIONAL PRINTER TEST 
SPARE FOR ADDITIONAL PRINTER TEST 
SPARE FOR ADDITIONAL PRINTER TEST 
SPARE FOR ADDITIONAL PRINTER TEST 
LIFE TEST 

CHARACTER ECHO TEST 
LINE ECHO TEST. FAST RATE 
LINE ECHO TEST, SLOW RATE 
CHARACTER/CODE ECHO TEST 
SELECTIVE PATTERN ECHO TEST 
BELL ECHO TEST 

SPARE FOR ADDITIONAL ECHO TESTS 
SPARE FOR ADDITIONAL ECHO TESTS 

SECONDARY CHARACTER SET OPTION 

SELECTIVE ADDRESSING OPTION 

AUTO ANSWER BACK OPTION 

FORM FEED OPTION 

HORIZONTAL TAB OPTION 

VERTICAL TAB OPTION 

SPARE FOR ADDITIONAL OPTION TESTS 

SPARE FOR ADDITIONAL OPTION TESTS 



H 4 
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CZLA00.P11 03-AUG-79 09:18 W TRAP DECODER 



ItOO 








CQT T 1 


CUT TDAD f\Cmf\CD 




1 OAQ 
1 TOT 














1 Q7ft 

\yf\j 














1 Q7 1 














1Q7? 




























1 Q7Z. 






, CHI 1 n 1 


jCWW 1 Lt 


ROUTINES FOR TRAPS THROUGH LOC. 30 AND 34. 








# 








1 T » 0 














1 077 

\y 1 1 














\y 1 o 


nn??L^ 


ni 1 fsL/\ 

U 1 1 OHD 


FMT IMT • 


nuv 


aSP.-(SP) ;6ET SAVED PC 


1070 




1A771A onnon? 




9UD 


ir2.aSP ; DECREMENT PC BY TWO 


1 Qftn 

1 TOW 


nn??SL 


ni7AiA nnnnnn 




nu V 


a(SP).asp 




1 0R1 

I tO I 




1P1AP7 onnopA 




TMPR 

l.nr D 


asp.ii'26 :CHEcic that call is within lihits 


1 OA? 

1 yoc 




1 ni Lfl? 






2% ; BRANCH IF OK 


1 0R? 

1 TO J 


UU J jOu 


V/UV/UUU 


1 1 • 


MAl T 






1 Qf<L 

1 TOH 


nnxx7n 


wUv f f O 




RR 

On 


1$ 




1 OA^ 

1 TO J 




nn^i 1 h 

uuo 1 1 o 






asp 


EHT ARGUMENT '2 


1 TOO 




nL?7\h i77nni 

UHc 1 1 O Iff \J\J 1 




Ri r 

o 1 ^ 


#1 77001 .asp 


REMOVE 7 MSB 


1QA7 

1 70 f 




0A?71fe 00X4?? 




Ann 


lEHTTAB.aSP 


FORM EHT RTN ADDRESS 


IQAA 

1 TOO 




oi7Aifk ononon 






a(SP).asp 




1989 

1 TOT 


001410 


OOS046 




clr 

V u n 


-(SP) .-CLEAR PSW 


\ yy\j 


nnx^i ? 

vUJH 1 c 


01?746 0014?0 




MOV 


(r3$,-(SP) 




1 001 

\ yy \ 


UU JH 1 o 






RT I 






1 007 

1 TTC 




oom XA 

vvU 1 JO 


Xi- 


J MP 


aiSP)+ ;60 TO EHT ROUTINE 


1 00 T 














1 OOL 

1 T TH 














1 00^ 

1 TT J 




i\r\L 1 1 ^ 


FMTTAR • 


T YP 




MESSAGE OUTPUT ROUTINE 


1 OOA 

1 ttO 




UU£U Jt 








•COMMON TEST EXIT 


1007 

1 TT 1 




nn^i 44 




T YPN 




MESSAGE OUTPUT ROUTINE, MULTI DEVICES 


1 OOA 

1 ttO 


yu js ju 


UvH 1 f ■* 








DELAY ROUTINE 


1000 
1 yyy 








TTVl 

1 1 1 1 




DHII CONSOLE TERMINAL CONTROL 


?nnn 

C\J\J\J 


UU Jl JH 


no?i 1? 




TT YJ 




DJ11 CONSOLE TERMINAL CONTROL 


>nni 


uu JO 


004474 




icrlf 

^ V n ^ 1 




CARRIAGE RETURN. ALL TERMINALS 










iSCRLF 




CARRIAGE RETURN. CONSOLE TERMINAL 


C\J\JJ 




nn^i 7*. 




ILF 




LINE FEED ONLY. ALL TERM'S 
PRINT CHAR, ALL TERM'S 










IPRTC 




pons 


onx44A 


004516 




sprhdr 




iPRINT TEST HEADER 




nni4sn 

UU JH 


00X716 

vV J ( 1 O 




(READ 




■READ CHAR 


cUUi 


UU J*t 


AAA CflA 
UUH JUD 




ICR 




; CARRIAGE RETURN ONLY. ALL TERM'S 


5nnA 
c uuo 


Uu j*« 


O0lX?0 

UU** JcU 




1 n J V 




;BINARY TO ASCII CONVERSION 


cuUt 


UU JO 


UUcu JL 




*r U"~w 






?r>i n 

Cu 1 u 




00?0?0 




SCLEAN 














$TESTC 




; CHECK CHAR 






UU J J 1 o 




SECHO 




;PRINT CHAR. CONSOLE ONLY 


pni < 


W J*VUO 


0036S4 

WW 




SINROY 




; CHECK IF READY 














P01 s 


005470 


005476 

WW J~ I W 




SFOUR 




:FOUR FILL CHARACTERS 


2016 


003472 


015736 




tCKSUR 




;CHECK SWITCH REG CONTENTS 


2017 


003474 


015774 




SCNTLU 




:RE-ENTER POINT FOR CKSWR ROUTINE 


2018 






# 








2019 














2020 















CZLADDO LA56 
CZLAOO.PII 



2021 
2022 
2025 
2024 
2025 
2026 
2027 
202? 
2029 
2030 
2031 
2032 
2033 
2034 
2035 



dhii/djii 

05- AUG- 79 



DIAG 
09:18 



HACYll 



005A76 

005476 012705 000004 

003502 012700 000006 

003506 104011 

003510 005305 

003512 101373 

003514 000002 



50A(1052) 
EHT TRAP 



05-AUG- 
OE CODER 



79 09:23 



1 4 
PAGE 



t.1 



SEO 004 7 



••• • CHGD5 •••• 

FOUR— THIS ROUTINE WILL PRINT fOUR FILL CHARACTERS 



CH6D5; 
SFOUR; 
It: 



MOV 

nov> 
pri'ntc 

DEI 
BHI 
RTl 



«4.R5 
#6,R0 

R5 
1S 



PLACE A FOUR INTO R5 
PLACE THE ACK CODE INTO R6 
TRANSMIT CODE 
DEC R5 
4 TIMES 



CZLADDO LA56 DHll/DJll D1A6 
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2036 

2057 

2058 

2059 

2OA0 

20A1 

2042 

20A5 

20A4 

20A5 

2046 

2047 

2048 

2049 

2050 

2051 

2052 

2053 

2054 

2055 

2056 

2057 

2058 

2059 

2060 

2061 

2062 

2065 

2064 

2065 

2066 

2067 

2068 

2069 

2070 

2071 

2072 

2073 

2074 

2075 

2076 

2077 

2078 

2079 

2080 

2081 

2082 

2085 

2084 

2085 

2086 

2087 

2088 

2089 
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SEO 0048 



.SBTTL COnnOM ROUTINES 



ECHO— THIS ROUTINE ECHOS CHARACTERS ON THE TERMINAL UNDER TEST. 



005516 


005737 


001224 




SECHO: 


TST 


1 A C 1 1 

lOSU 


005522 


001026 








BNE 


C r LiAA 1 

cCHODJ 


005524 


037737 


175420 


AA4 4 ^ A 

001 160 




BIT 


AD M A C ^ 

•BAR ,nA2>K 


005552 


001371 








BNc 


• c r un 

»tv,nU 


005534 


010037 


A A 4 1 ^ t 

001124 






nOv 




003540 


013777 


AA 4 1 C ^ 

001 156 


1 "7 C 1 7 A 

1 75370 




WOv 


1 1 kic aja AC r d 


003546 




001 1 c4 






nUV 


• 1 CHrLH 


005554 


012777 


1 7 7 7 7'? 

1 77777 








• ~ 1 , alD T tK 


005562 


012777 


000020 


1 7536c 




ntJV 




005570 


AC T T "yT 

053777 


AA 1 1 ^ A 

001 160 


1 fji^C 




Die 














RT 1 


HASK.aTCR 


005600 


013777 


001160 


175432 


ECHODJ: 


HOV 


005606 


052777 


000400 


175422 


IS: 


BIS 


UBITS.aCSR 


005614 


005777 


175416 




2t: 


TST 


acsR 


003620 


100375 








BPL 


2t 


003622 


017704 


175414 






HOV 


aTBUF,R4 


003626 


000304 








SWAB 


R4 


003630 


042704 


177760 






BIG 


#177760. R4 


003634 


020437 


001156 






CHP 


R4,LINEN0 


005640 


001362 








BNE 


It 


005642 


110077 


175374 






MOVB 


RO.aTBUF 


005646 


110037 


001124 






HOVB 


RO.TEHPCH 


003652 


000002 








RTl 





DJil OR DHll 

BRANCH IF DJll 

CHECIC IF OK TO SEND TO DHll 

NO. WAIT UNTIL OK 

CHAR INTO TEHPCH 

SET LINE NUMBER 

OK. PUT ADDR OF CHAR INTO CARA 

SET CHAR COUNT TO 1 

SET SILO OVERFLOW TO 16 

SET TRANSMIT BIT 

RETURN 

SET LINE NO. IN TCR 

START TRANSMITTER SCANNER 

CHECK IF OK 

BRANCH IF NOT READY 

GET CONTENTS OF T8UF 

RIGHT JUSTIFY LINE NO. 

SAVE ONLY THE LINE NO. 

BE SURE IT'S THE LINE UNDER TEST 

BRANCH IF NOT 

LOAD CHAR TO PRINT 

SAVE CHAR IN TEMPCH 

RETURN 



INRDY— CHECKS IF ANY INPUT FROM TERMINAL UNDER TEST. 

RETURN VIA PC IF NO CHAR OR VIA PC+2 IF VALID CHAR. 
BE IN BITS 6-0 OF TEMPCH. 
CALLING SEQUENCE: 
INRDY 

NO CHAR RETURN 
VALID CHAR RETURN 



CHAR WILL 



005654 
005660 
003662 
005666 
003670 
003674 
003700 
005702 
005710 
003714 



017700 
100015 
010057 
000300 
042700 
020037 
001365 
042737 
062716 
000002 



175260 

001124 

177760 
001156 

177600 001124 
000002 



SINRDV: 


MOV 


aNRCRA.RO 




BPL 


1$ 




HOV 


RO, TEMPCH 




SWAB 


RO 




BIC 


#177760. RO 




CMP 


RO.LINENO 




BNE 


SINRDY 




BIC 


#177600. TEMPCH 




ADD 


#2.asp 


1»: 


RTI 





GET CHAR 

BRANCH IF NO CHAR 
SAVE CHAR 

RIGHT JUSTIFY LINE NO. 

SAVE ONLY LINE NO. 

CHECK IF SAME AS LINE UNDER TEST 

BRANCH IF NOT LINE UNDER TES* 

SAVE ONLY THE CHAR 

SET UP RETURN ADDR. 

RETURN 



CZLADDO LA56 
CZLADO.Pn 

2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 
?101 
2102 
2103 
210A 
2105 
2106 
2107 
2108 
2109 
2110 
2111 
2112 
2113 
21U 
2115 
2116 
2117 
2118 
2119 
2120 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2154 
2155 
2156 
2157 
2158 
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SEQ 0049 



READ— THIS ROUTINE READS INPUT FROH THE TERMINAL UNDER TEST ONLY 

IF SU13 IS SET. OIHERUISE ALL TERMINALS ARE SCANNED FOR INPUT 
AND TERMINAL WHERE CHARACTER IS RECEIVED IS SET AS THE 
TERMINAL UNDER TEST. 





03P777 

\JjC Iff 


0?0000 


175320 




BIT 


»BIT13,aSR :SU15 SET? 














IS .-BRANCH IF NOT 


\J\J J ' Cv 


01 7700 


1 75P06 






MOU 


aNRCRA.RO :GET CHAR 


00373? 


100371 

1 WW J ' I 








RPl 


SREAD :N0 CHAR, WAIT FOR ONE 


003734 


010004 

w 1 vww*f 








MOU 


R0.R4 :VALID DATA 


003736 


000304 

www Jw"* 








SUAB 


R4 ;RIGHT JUSTIFY LINE NO. 


003740 


042704 


1 77760 

Iff* Uw 






BIC 


iri 77760, R4 ;SAVE ONLY LINE NO. 


003744 


020437 

W b W^ J 1 


001 156 

Ww 1 1 






CMP 


R4,LINEN0 : CHECK IF SAME AS LINE UNDER TEST 


0037SO 


001362 

WW 1 








BNE 


SREAD : BRANCH IF NOT 


003752 


000424 

w Ww~ b ^ 








BR 


4S : CONTINUE 


003754 


010146 






IS: 


MOV 


R1,-(SP) ; 
R2,-(SP) 


SAVE Rl 


005756 


010246 








MOV 




003760 

WW J ( Ww 


010346 

W 1 w J^\J 








MOV 


R3,-(SP) 




003762 

w W • wC 


01 0446 

w 1 wT T V 








MOV 


R4.-(SP) 




003764 


005737 

w w ^ » J • 


001224 






TST 


lOSU 


DH OR DJ? 


003770 


001005 

WW I J 








BNE 


2S 


BRANCH IF DJ 


003772 


004737 


002674 






JSR 


PC.SCANDH 


LOOK FOR INPUT 


003776 


004737 


002750 






JSR 


PC.SETERM 


SETUP TERMINAL UNDER TEST 


004002 

W w~ V W C 


000404 

W W W~ W ~ 








BR 


3S 


CONTINUE 


004004 

V w » V w~ 


004737 


005106 




2S: 


JSR 


PCSCANDJ 


LOOK FOR DJ INPUT 


004010 

W W ' W 1 ^0 


004737 


005214 






JSR 


PCSETDJ 


SETUP DJ UNDER TEST 


004014 


012604 






5$: 


MOV 


(SP)+.R4 


RESTORE REGS 


004016 


012603 








MOV 


(SP)+.R3 




004020 

W W ~ W b w 


012602 








MOV 


(SP)*,R2 




004022 


012601 








MOV 


(SP)+.R1 




004024 


010037 


001130 




4$: 


MOV 


RO.PCHAR 


SAVE CHAR WITH PARITY BIT 


004050 


113737 


001150 


001127 




MOVE 


PCHAR,PARITV+1 


:6ET CODE FOR PARITY CHECK 


004036 


042737 


177400 


001150 




BIC 


#1 77400. PCHAR 


; CLEAR UNWANTED BITS 


004044 


042700 


177600 






BIC 


#1 77600. RO 


;SAVE ONLY THE CHAR 


004050 


010037 


001124 






MOV 


RO.TEMPCH 




004054 


012700 


0000 n 






MOV 


#11. RO 


;SET SHIFT COUNT 


004060 


042737 


000577 


001126 




BIC 


#377, PARITY 


; CLEAR PARITY FLAG 


004066 


005300 






5t: 


DEC 


RO 


;DECREMENT SHIFT COUNT 


004070 


001406 








BEQ 


6S 


;EX1T IF DONE 


004072 


106337 


001127 






ASLB 


PARITY*! 


; ROTATE CODE 


004076 


105575 








BCC 


5S 


; CONTINUE IF CARRY BIT WAS A ZERO 


004100 


105157 


001126 






COMB 


PARITY 


;C0MPL1HENT PARITY FLAG IF BIT WAS 


004104 


000770 








BR 


5S 


: CONTINUE 


004106 


015700 


001124 




6S: 


MOV 


TEHPCH,RO 


;RESTORE RO 


004112 


000002 








RTI 




; RE TURN 



ONE 



00A1U 
004116 
004122 
004124 
004126 
004150 
004132 
004134 
004136 
004140 
004142 



CZLAODO LA56 
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2139 

2140 

2141 

2142 

2143 

2144 

2145 

2146 

2147 

2148 

2149 

2150 

2151 

2152 

2155 

2154 

2155 

2156 

2157 

2158 

2159 

2160 

2161 

2162 

2163 

2164 

2165 

2166 

2167 

2168 

2169 

2170 

2171 

2172 

2173 

2174 

2175 

2176 

2177 

2178 

2179 

2180 

2181 

2182 

2183 

2184 

2185 



OHll/DJll 
03- AUG- 79 



004144 
004146 
004152 
004154 
004156 
004160 
004162 
004164 
004166 
004170 
004172 



011601 
062716 
011101 
112100 
100402 
001003 
000002 
104007 
000772 
104021 
000770 



011601 
062716 
011101 
112100 
100402 
001003 
000002 
104006 
000772 
104011 
000770 



DIAO 
09:18 
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XXXXXXXXXX 

TYPE— A COWON ROUTINE USED TO TYPE MESSAGES ON THE TERMINAL 
UNDER TEST ONLY. THE NULL CHARACTER TERMINATES 
THE MESSAGE. CALLED THROUGH AN EMT TRAP. 
CALLING SEQUENCE 
TYPE 

; ADDRESS Of MESSAGE 



SEO 0050 



000002 



000002 



MESG 
XXXXXXXXXX 



TYP: 
1$: 

2S: 
3$: 



MOV 

ADD 

MOV 

MOVB 

BMI 

BNE 

RTI 

SCRLF 

BR 

ECHO 
BR 



asp.Ri 
#2,asp 
aRi.Ri 

(R1)*.R0 

2S 

3S 



IS 
IS 



GET POINTER TO ADDR. OF MESG. 
SET UP RETURN ADDRESS 
ADDR. OF MESG TO Rl 
GET CHAR 

BRANCH IF WANT AUTO CR-LF 

PRINT CHAR IF NOT NULL 

EXIT ON NULL CHAR 

SEND A CRLF 

GET NEXT CHAR 

OUTPUT CHAR 

60 GET NEXT CHAR 



XXXXXXXXXX 



TYPM MULT I TYPE-A COMMON ROUTINE TO OUTPUT 

A MESSAGE ON ALL DHllS. 
THIS ROUTINE IS USED BY 
THE PRINTER TESTS TO TYPE HEADINGS. 
CALLING SEQUENCE: 
TYPEM 

HESGAD : ADDRESS OF MESSAGE 



XXXXXXXXXX 



TYPM: 



IS: 



2S: 
5S: 



MOV 

ADD 

MOV 

MOVB 

BMI 

BNE 

RTI 

CRLF 

BR 

PRINTC 
BR 



asp.Ri 
#2.asp 
aRi.Ri 

(R1)*.R0 

2S 

3S 



IS 



IS 



GET POINTER TO ADDR OF MESG 
SET UP RETURN ADDRESS 
ADDR OF MESG TO Rl 
GET CHAR 

BRANCH IF WANT AUTO CR-LF 

CONTINUE IF NOT NULL 

RETURN TO CALLER 

SEND CR-LF 

GET NEXT CHAR 

PRINT CHAR 

GO GET NEXT CHAR. 
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21B6 

2187 

2188 

2189 

2190 

2191 

2192 

2193 

219A 

2195 

2196 

2197 

2198 

2199 

2200 

2201 

2202 

2205 

2204 

220S 

2206 

2207 

2208 

2209 

2210 

2211 

2212 

2213 

22U 

2215 

2216 

2217 

2218 

2219 

2220 

2221 

2222 

2223 



DHll/OJll 
03-AU6-79 



DIAG 
09:18 



HACYll 30A(1052) 05-AUG-79 09:25 
COnnON ROUTINES 



n 4 

PAGE 



51 



SEO CC 



DELAY— A COnnON ROUTINE TO DELAY PROCESSING 
A GIVEN NUHBER Of MSEC. 
CALLING SEQUENCE; 

nOV «5,R0 :R0 CONTAINS THE NUHBER OF MSEC DELAY DESIRED 
DELAY 

THE DELAY IS EFFECTED BY THE EXECUTION OF THE LOOP; 
It: DEC R1 
BNE IS 

SINCE THE EXECUTION TIMES OF THE PDPll LINE DOES VARY FROH 
MACHINE TO MACHINE, THE VALUE AT SYMBOLIC LOCATION 
"TIMER" MUST BE CHANGED TO THE APPROPRIATE VALUE AS SHOWN BELOW 
BEFORE STARTING THE DIAGNOSTIC. "TIMER" IS INITIALIZED 
FOR AN PDP-11/40 (TIMER = 554). 

11/45 ft 11/70 

MOS CORE 
.51 .90 
.98 1.13 
1.49USEC 
1237 755 

xxxxxxxxxx 



MACHINE 


05810 


55&40 


15820 


BIPOLAR 


LOOP: DEC R1 


3.4 


.99 


2.5 


.30 


BNE LOOP 


2.5 


1 .76 


2.6 


.60 


TIME = 


5.9US 


2.75 


4.9 


.90USEC 


SET TIMER 


251 


554 


314 


2127 



2.03USEC 



004174 
0041 76 
004202 
004204 
004206 
004210 
004212 
004214 



010146 
013701 
005301 
001376 
005300 
001572 
012601 
000002 



001102 



DLY: 


MOV 


R1 .-(SP) 


SAVE Rl 


1$: 


MOV 


TIMER, Rl 


MOV IMSEC LOOP CNT TO Rl 


2$: 


DEC 


Rl 


DECREMENT COUNT 


BNE 


2% 


■BRANCH IF NOT ZERO 




DEC 


RO 


■DEC NO. OF MSEC DELAY 




BNE 


11 


;OElAY AGAIN IF NOT ZERO 




MOV 


(SP)+,R1 


;ALL DONE RESTORE Rl 




RTI 







CZLAOOO LA56 OHil/DJil OlAG 



CZlADD 


.P11 05-AUG-79 


2224 






2225 






2226 

k i> 4. w 






2227 






2228 






2229 






2250 






2251 






2252 






2255 






2254 






2255 


004216 


010046 


2256 


004220 


010146 


2257 


004222 


010246 


2258 


004224 


010546 


2259 


00' 226 


010446 


2240 


004250 


010546 


2241 


004252 


015746 


2242 


004256 


010657 


2245 


004242 


012757 


2244 


004250 


000000 


2245 






2246 






2247 


004252 


000000 


2248 






2249 






2250 


004254 


104002 


2251 


004256 


004310 


2252 


004260 


013706 


2255 


004264 


012637 


2254 


004270 


012605 


2255 


004272 


012604 


2256 


004274 


012603 


2257 


004276 


012602 


2258 


004300 


012601 


2259 


004502 


012600 


2260 


004504 


AAA 1 1 7 

0001 37 


2261 






2262 


004510 


050200 


2265 


004316 


000200 


2264 
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PF AIL— POWER FAIL ROUTINE 

SAVE ALL REGISTERS AND SET RESTART ADDRESS 
INTO LOCATION 24 

RESTART— POWER FAIL RECOVERY 

RESTORE ALL REGISTERS AND GO TO START 



PFAIL: 



000024 
004252 
004254 



000024 



nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 

HALT 



SAVR6: .WORD 



RESTRT; 



004252 
000024 



001502 
053517 



051105 IS: 



TTPEn 
IS 

nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 
jnp 

.ASCIZ 
.EVEN 



RO.-(SP) 
R1,-(SP) 
R2,-(SP) 
R3.-(SP) 
R4.-{SP) 
R5.-{SP) 
24, -(SP) 
SP,SAVR6 
l»RESTRT.24 



;SAVE STACK POSITION 
; STORE RESTART ADDRESS 



SAVR6,SP 
(SP)+.24 
{SP)+,R5 
(SP)+,R4 
{SP)+,R3 
(SP)+.R2 
(SP)*,R1 
(SP)*,R0 
STARTX 



<ACRLF>/POWER/<ACRLF> 



;TVPE POWER nESG 

.•RESTORE STACK POINTER 
;RESTORE PFAIL ADDRESS 



QQUUOb 



CZLADOO LA56 0h11/0j11 DUG HACYll 
tZLAOO.Pll 03-AUG-79 09:18 



2266 
2267 
2268 
2269 
2270 
2271 
2272 
2275 
2274 
2275 
2276 
2277 

2278 004520 010257 004404 

2279 00A524 006302 

2280 004526 062702 004A12 

2281 004552 014257 004410 

2282 004556 005057 004406 
2285 004542 165701 004410 

2284 004546 105405 

2285 004550 005237 004406 

2286 004554 000772 

2287 004556 065701 004410 

2288 004562 062757 000060 

2289 004570 115720 004406 

2290 004574 005557 004404 

2291 004400 001554 

2292 004402 000002 
2293 
2294 
2295 
2296 
2297 
2298 

2299 004412 000001 000012 
2500 004420 001750 023420 
2501 
2502 
2503 
2504 
2505 
2506 
2507 
2508 
2509 

2510 004424 013700 001124 

2311 004430 020027 000060 

2312 004434 103407 

2313 004456 020027 000067 

2514 004442 101004 

2515 004444 062716 000002 

2516 004450 042700 177770 
2317 004454 000002 



004404 
004406 
004410 

004412 
004420 



000000 
000000 
000000 

000001 
001750 
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BINARY TO ASCII CONVERSION (1 TO 5 ASCII CHARACTERS) 



CALLING SEQUENCE 



NOV 
NOV 
NOV 

BTOASC 



ADDRESS Of LOC TO STORE flRST ASCII CHAR. INTO RO 

BINARY NUMBER TO BE CONVERTED INTO R1 

NUMBER TO BE CONVERTED AS A POtlER OF TEN INTO R2 



SBTASC: 



IS: 



2S: 



5S: 



CNVCTR 
DIGIT: 
TENPUR 

000144 ADTENP 



NOV 

All 

ADl> 

NOV 

CLR 

SUB 

BCS 

INC 

BR 

ADD 

ADD 

NOVB 

DEC 

6NE 

RTI 



.WORD 
.WORD 
.WORD 



R2. CNVCTR 
R2 

#ADTENP.R2 
-(R2). TENPUR 
niGlT 
TENPUR, R1 
5S 

DIGIT 
2t 

TENPUR. R1 
#60. DIGIT 
DIGIT, (RO)* 
CNVCTR 
IS 



0 
0 
0 



SAVE TEN POWER 
R2*2 

CALCULATE ADDRESS OF STARTING TEN POWER 

POWER OF TEN VALUE TO TENPWR 

CLEAR CURRENT DIGIT 

SUBTRACT TEN POWER FROM BINARY VALUE 

BRANCH IF END 



RESTORE SUBTRACTED VALUE 

CONVERT (DIGIT) TO ASCII 

PUT ASCII CHAR INTO USER BUFFER 

FINISH ALL CHARS CALLED FOR 

BRANCH IF NOT FINISHED 

RETURN 



CONVERSION CHARACTER COUNT 
CONVERTED CHARACTER 
CURRENT TEN POWER 



.WORD 1.. 10. .100. .1000. ,10000. 



TESTC— CHECKS FOR INPUTTED OCTAL DIGIT 
BETWEEN A C AND A 7 INCLUSIVE 



STESTC; 



IS: 



NOV 
CNP 
BLO 
CNP 
BHI 
ADD 
6IC 
RTI 



TEHPCH.RO 

R0.#60 

IS 

R0,#67 
IS 

#2,asp 

#1 77770, RO 



GET CHAR 

CHECK IF NUMERIC AND EQ .GT 0 

BRANCH ERROR 

CHECK IF EQ OR LT 7 

BRANCH ERROR 

SET UP RETURN ADDRESS 

SAVE ONLY THE DIGIT 

NORMAL RETURN 



004472 



CZLADOO LA56 
CZLAOO.Pn 



2518 

2519 

2520 

2521 

2522 

2525 

2524 

2525 

2526 

2527 

2528 

2529 

2550 

2551 

2552 

2555 

2554 

2555 

2556 

2557 

2558 

2559 

2540 

2541 

2542 

2545 

2544 

2545 

2546 

2547 

2548 

2549 

2550 

2551 

2552 

2555 

2554 

2555 

2556 

2357 

2558 

2559 

2560 

2561 

2562 

2565 

2364 

2365 

2366 

2567 

2368 

2569 



DHll/DJil 
05- AUG- 79 



DIAG 
09:18 
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004474 
004476 
004502 
004504 

004506 
004512 
004514 



004516 
004520 
004522 
004526 
004550 
004552 
004534 
004540 
004544 
004546 
004552 
004556 
004562 
004564 
004566 
004570 



112700 000015 
104021 

112700 000012 

104021 

000002 



104014 

012700 000012 

104011 

000002 

012700 000015 

104011 

000002 



104002 
017642 
013700 
006200 
006200 
006200 
042700 
062700 
104011 
013700 
042700 
062700 
104011 
104006 
104010 
000002 



001106 



177770 
000060 

001106 
177770 
000060 



SCRLF" A COWON ROUTINE 10 OUTPUT A CR AND LF TO 
THE TEST TERMINAL ONLY. 



#15, RO 



SSIRLF: HOVB 
ECHO 

nOVB I12,R0 

ECHO 
RTI 



SEND A CR 

UAIT UNTIL PRINTER IS READY 
SEND A LF 

;RETURN TO CALLER 



XXXXXXXXXX 

CRLf— ROUTINES TO SEND A CR AND/OR LF TO ALL TERMINALS. 
XXXXXXXXXX 



SCRLF 
SLF: 



SCR; 



CR 

nov 

PRINTC 
RTI 

MOV 

PRINTC 

RTI 



#12. RO 



#15. RO 



SEND CR 
LF TO RO 
SEND IT 
RETURN 

CR TO RO 
SEND IT 
RETURN 



ROUTINE TO PRINT TEST HEADER 



SPRHDR: TYPEM 



;PR1NT MESG 



HDRMSG 






MOV 


RTNNO.RO ;GET TEST NUMBER 


ASR 


RO ;6ET FIRST DIGIT 


ASR 


RO 




ASR 


RO 




BIG 


#177770. RO 


MASK FIRST DIGIT 


ADD 


#60. RO 


MAKE ASCII 


PRINTC 


PRINT IT 


MOV 


RTNNO.RO 


GET TEST NUMBER AGAIN 


6IC 


#177770. RO 


MASK LAST DIGIT 


ADD 


#60. RO 


MAKE ASCII 


PRINTC 




PRINT IT 


CRLF 




CR-LF 


LF 




;BLANK LINE 


RTI 




;RETURN 



CZLADDO LA36 DHU/DjH OlAG 
CZLADO.PII 05-AU&-79 09:18 



2370 

2571 

2572 

2575 

257A 

2575 

2576 

2577 

2578 

2579 

2580 

2581 

2582 

2585 

2584 

2585 

2586 

2587 

2588 

2589 

2390 

2391 

2392 

2393 

239A 

2595 

2596 

2597 

2598 

2599 

2400 

2401 

2402 

2403 

2404 

2405 

2406 

2407 

2408 

2409 

2410 

2411 

2412 

2413 

2414 

2415 

2416 

2417 

2418 

2419 

2420 

2421 

2422 

2425 

2424 

2425 
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PRINTC— THIS ROUTINE IS USED TO DRIVE EACH OF THE EXISTING TERMINALS 

ON EACH OF THE EXISTING DHll'St AS DEFINED BY THE SET UP IN ElTAB). 

IF IN THE MAINTENANCE NODE SR BIT 13 CONTROLS WHETHER OR NOT 

ALL DHll'S ARE DRIVEN OR ONLY THE TERMINAL UNDER TEST. SET 

BIT 13 DOWN TO DRIVE ALL TERMINALS ON ALL OHiTS. SET BIT 13 UP TO 

DRIVE ONLY THE TERMINAL UNDER TEST. 

EACH TERMINAL IS DRIVEN ONE CHARACTER AT A TIME. 

PRINTC WILL LOOP WAITING FOR THE FIRST TERMINAL TO BE READY 

ENTER WITH CHAR TO PRINT IN RO. 



004572 








CHGD10: 






004572 


010046 






tPRTC: 


MOV 


RO,-(SP) 


004574 


010146 








MOV 


R1 .-(SP) 


Q04 57fe 


010246 








MOV 


R2,-(SP) 


004600 


010346 








MOV 


R3,-(SP) 


004602 


010446 








MOV 


R4.-(SP) 


004604 


010546 








MOV 


R5,-CSP) 


004606 


005737 


001224 






TST 


lOSW 


004612 


001402 








BEQ 


IS 


004614 


000137 


005474 






JMP 


PRINTJ 


004620 


005737 


001230 




1$: 


TST 


DHCNT 


004624 


001576 








BEQ 


12$ 


004626 


052777 


020000 


174410 




BIT 


«BlTl3,aSR 


004634 


001453 








BEQ 


6$ 


004636 


104021 








ECHO 




004640 


104022 








INRDY 


18$ 


004642 


000446 








BR 














004644 


023727 


001124 


000007 




CMP 


TEMPCH.#7 


004652 


001002 








BNE 


20$ 


004654 


104024 








CKSWR 


12$ 


004656 


000561 








BR 


004660 




001 124 


UUU 1 f 1 


# 

c\}\ : 


CMP 


TEMPCH.#177 


004666 


001402 








BEQ 


2$ 


004670 


000137 


005416 






JMP 


ENDITR 


004674 


025727 


001106 


000024 


2$: 


CMP 


RTNN0,«24 


004 702 


001004 








BNE 


3$ 


004704 


012766 


012224 


000014 




MOV 


#TERM.14(SP) 


004712 


000545 








BR 


12$ 


004 714 


025727 


001106 


000021 


5$: 


CMP 


RTNN0.«21 


004722 


001004 








BNE 


4$ 


004 724 


012766 


011234 


000014 




MOV 


*E021B,14ISP) 


004732 


000553 








BR 


12$ 


004754 


025727 


001106 


000022 


4S: 


CMP 


RTNN0,I22 


004742 


001004 








BNE 


5$ 


004744 


012766 


011314 


000014 




MOV 


#E022B.14CSP) 


004752 


000523 








BR 


12$ 


004754 


000137 


002540 




5$: 


JMP 


TTYIH 


004760 


000137 


005432 




18$: 


JMP 


ENDIT 


004 764 


013737 


001134 


001232 


6$: 


MOV 


DHA0R,SCR1 


004772 


012705 


017402 






MOV 


*ELTAB.R5 



:SAVE RO 

.-SAVE R1 

;SAVE R2 

;SAVE R5 

;SAVE R4 

;SAVE R5 

:DH11 OR DJ11? 

:G0 TO DJ11 ROUTINE 

;ANY DHirS PRESENT? 

; RE TURN IF NONE 

;CHECK IF SR BIT15 IS SET 

:DRIVE ALL TERMINALS IF NOT SET 

.•OUTPUT CHAR 

.•CHECK IF ANY INPUT 

;N0. RETURN 

.■INPUT, CHECK IF A *6 

:1F NOT, BRANCH 

;60 TO SOFT SWITCH REG INPUT 

;RETURN TO EXIT TEST PROPERLY 

; INPUT, CHECK IF A RUBOUT 

;N0 RUBOUT, RETURN 

;CHECK IF TEST 24 

; BRANCH IF NOT 

;$ET RETURN ADR 

;RETURN TO EXIT TEST PROPERLY 

.•TEST 21? 

.•BRANCH IF NOT 

.-SET RETURN TO EXIT TEST PROPERLY 

;RETURN 

.-TEST 22? 

.•CONTINUE IF NOT 

.-SET RETURN ADR 

.•RETURN TO EXIT TEST PROPERLY 

;60 WAIT 

;INIT ADDR OF FIRST DHll 

;1NIT ADDR TO EXISTING TERM TAB 



r/LAOOO LA56 DHll/DJll DIAG 
CZLADO.Pll 05-AU&-79 09:18 

2A26 00A776 012704 016402 

2427 005002 015705 001250 

2428 005006 012702 000001 

2429 005012 005001 

2450 005014 015757 001252 

2451 005022 062757 000012 

2452 005050 051502 
2455 005052 001155 

2454 005054 057702 174174 

2455 005040 001575 

2456 005042 062757 000004 

2457 005050 112777 000020 

2458 005056 162757 000016 

2459 005064 110177 174144 

2440 005070 062757 000002 

2441 005076 005777 174152 

2442 005102 100072 

2445 005104 017757 174124 
2444 005112 042757 177600 
2445 

2446 005120 025727 001124 

2447 005126 001002 

2448 005150 104024 

2449 005152 000455 
2450 

2451 005154 025727 001124 

2452 005142 001052 

2455 005144 025727 001106 

2454 005152 001004 

2455 005154 012766 012224 

2456 005162 000520 

2457 005164 025727 001106 

2458 005172 001004 

2459 005174 012766 011254 

2460 005202 000510 

2461 005204 025727 001106 

2462 005212 001004 

2465 005214 012766 011514 

2464 005222 000500 

2465 005224 000157 002540 

2466 005250 025727 001124 
'^67 005256 001004 

2468 005240 025727 001106 

2469 005246 001466 

2470 005250 015757 001124 

2471 005256 010046 

2472 005260 012700 000056 
2475 005264 104005 

2474 005266 012600 

2475 005270 062757 000002 

2476 005276 011477 175752 

2477 005502 062757 000002 

2478 005510 010146 

2479 005512 006501 

2480 005514 006501 

2481 005516 006501 
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nov 


#DHn00,R4 


INIT ADDR TO VP TAB 








0HCNT.R5 


INIT DHll COUNT 




71: 


wov 


• 1.R2 


INIT CURRENT LINE NO. 






CLR 


R1 


SET UP CURRENT CHANNEL NUHBER 


001254 




«0V 


SCR1 .SCR2 


SET SCR2 = ADDR OF CURRENT DHll 


001254 




ADD 


#12.SCR2 


SET SCR2 - ADDR OF BAR 




8S: 


BIT 


aR5,R2 


TEST IF TERMINAL EXISTS 






BNE 


17$ 


BRANCH IF NO TERHINAL 




9$: 


BIT 


aSCR2,R2 


TEST IF OK TO SEND 






BNE 


9$ 


TEST AGAIN 


001254 




ADD 


#4,SCR2 


ADDR OF SILO STATUS 


174156 




HOVB 


l20,asCR2 


SET SILO OVERFLOW TO 16 


001254 




SUB 


#16.SCR2 


•SET SCR2 AS ADDR OF SCR 






novB 


Rl,aSCR2 


PUT CHANNEL NO. INTO SCR 


001254 




ADD 


#2,SCR2 


SET CHAR BUF ADR 






TST 


aSCR2 


■ANY INPUT? 






BPL 


16$ 


-CONTINUE IF NONE 


001 124 




HOV 


aSCR2,TEHPCH 


"GET CHAR 


A A 4 4 ^ i 

0011 24 




BIC 


#1 77600, TEHPCH , 


MASK CHAR 










000007 




CMP 


TFMPrH #7 


■CHECK IF 'G 






RNF 


19$ 


'BRANCH IF NOT G 






CKSUR 




'GO TO SOFT SWITCH REG INPUT 






BR 


12$ 


■RETURN TO EXIT TEST PROPERLY 


AAA 1 "77 

0001 77 


19»: 


CMP 


TEHPCH 1177 


; CHECK IF RUBOUT 






BNE 


14$ 


; BRANCH IF NOT RUBOUT 


AA A A1 / 

000024 




cnp 


RTNN0.#24 


;TEST 24? 






BNE 


10$ 


'BRANCH IF NOT 


A A A A 1 / 

00001 




nov 


ITERH 14(SP) 


;SET RETURN ADR 






BR 


ENDITD 


;RETURN TO EXIT TEST PROPERLY 


A AAA T 1 

000021 


1 Atf 

10»: 


CHP 


RTNN0,IV21 


• TEST^ : ? 






BNE 


11$ 


'BRANCH IF NOT 


A A A A 1 / 

00001*1 




nov 


irE021B,14(SP) 


;SET RETURN ADR 






BR 


ENDITD 


.RETURN TO EXIT TEST PROPERLY 


A A A A T "1 

000022 


111: 


CHP 


RTNN0,/r22 


;TEST 22? 






BNE 


15$ 


; BRANCH IF NOT 


A A A A 4 / 

000014 




HOV 


/rE022B,l4(SP) 


;SET RETURN ADR 




12»: 


BR 


ENDITD 


;RETURN TO EXIT TEST PROPERLY 




15$: 


J HP 


TTYlH 


; CONTROL 


A A A A A T 

000005 


4 / * 

14$: 


CMP 


TEHPCH. #5 


;CHAk = CONTROL-C ? 






BNE 


15$ 


; CONTINUE If NOT 


A A A A i 

000024 




CHP 


RTNN0,«24 


;TcST 247 






BEQ 


ENDITD 


;EXIT IF TEST 24 


A A 1 4 4 i 

001 1 14 


4 C * 

15$: 


nov 


TEHPCH. REPT 


;SAVE CHAR FOR TESTS 21 AND 22 






nov 


RO.-(SP) 


;SAVE RO 






HOV 


1^50., RO 


;DELAY FOR HALF DUPLEX 






DELAY 










nov 


(SP)*.R0 


;RESTORE RO 


001254 


4 y * 

16$: 


ADD 


il'2.SCR2 


;SCR2 EQ ADDR OF lPR 






HOV 


(R4},aSCR2 


.PTAAP \tT\ tftlTA 1 AD 

;STORE VP INTO LPR 


AA ITT/ 

UU 1 c 34 




ADD 


#2,SCR2 


•Ann ? Tn &nnnD lu ^ro? 






HOV 


R1,-(SP) 


;SAVE Rl 






ASL 


Rl 


;FIND TABLE POINTER 






ASL 


Rl 


;T0 STORE CHAR 






ASL 


Rl 


;FOR THIS CHANNEL 



CZLADDO LA36 OHll/OJll OlAO 



CZLADD. 


P11 05-AUG-79 


09:18 


2482 


00S520 


A A ^ T A 1 

006501 






005522 


AZ. AX A ' 

06050 1 






005524 


Ai ^ 7A 1 

062701 


006157 




005550 


1 1 AA1 1 

1 lOOl 1 




2486 


005552 


A1 A1 77 
0101 // 


173676 


2487 


005556 


A1 ^^A1 

012601 




2488 


00^540 


06c/ if 


000002 


2489 


AAC TJ 

005546 


01 Cf / f 


177777 


2490 


AAC TCy 

005554 


nL. J7Z7 

06c f 3/ 


000002 


2491 


AAC TA.'i 


ACA077 
05UC f 1 


175646 


2492 


AAC ^ 

005 j66 


AAC73/ 

005 f CH 




2495 


AAC 7 7A 


AAC Ortl 

005c0 1 




2494 


AAC T 7 "5 
0055/ C 


00650c 




2495 


AAC 17/ 

0053/4 


1 AX51 ^ 

1 05c 1 5 




2496 


UU53f o 






2497 








2498 


u05'»Ut 


Uocr jf 


000020 


2499 


AAC/ 1 A 

0054 1 0 


005 1 c5 




2500 


AAC / 1 3 

U054 1 c 


UUU 1 5i 


005006 


2501 








2502 






001124 


2503 


AAC/ 1 Z, 


f>1 ^7^7 

U 1 J 1 J f 


2504 


AAC/ 5/ 


U 1 C f uu 


000056 


2505 


AAC/ lA 


1 U*iUU5 




2506 








2507 


AAC/ T5 

U05H jc 


0 1 C0U7 




2508 




U 1 cou<« 




2509 


U05'» JO 


U 1 COU J 




2510 


AAC/ /A 

UU5*»*»U 


0 1 cOUC 




2511 


U05*«HC 


ni 5Ani 

U 1 COU 1 




2512 


AAC / / / 

UU5*»*»'« 


u 1 couu 




2513 


UV/5*»'«0 


UC J 1 C f 


001124 


2514 


005454 


001006 




2515 


005456 


023727 


001106 


2516 


005464 


001002 


012140 


2517 


005466 


012716 


2518 


005472 


000002 





HACY11 50A(1052) 05-AUG-79 09:25 PAGE 
COmON ROUTINES 



ASL Rl 

ADD R5,R1 

ADD ICHARAC-I.RI 

nOVB RO.(Rl) 

nov Ri,ascR2 

«0V (SP)*.R1 

ADD «2,SCR2 

nOV *177777.aSCR2 

ADD lf2,SCR2 

BIS R2.aSCR2 

TST (R4)* 

INC Rl 

ASL R2 

see 8S 

DEC R5 

BEQ ENDIT 

ADD «20.SCR1 

TST (R5)* 

JMP 7» 



001254 
173660 
001234 



171: 



001232 



001114 



ENDITR; 
ENDITD; 



ENDIT; 



000003 
000024 



IS: 



MOV TEHPCH.REPT 

nOV «30.,R0 
DELAY 

«0V (SP)*,R5 

HOV (SP)*.R4 

MOV ISP)*.R3 

HOV {SP)+.R2 

HOV ISP)*.R1 

HOV {SP)*.RO 

CHP TEHPCH,#5 

BNE IS 

CHP RTNN0,«24 

BNE IS 

HOV *E024R,(SP) 
RTI 



57 



SEO 0057 



; STORE CHAR 

:ADDR OF CHAR INTO CARA 
;RESTORE Rl 

:ADD 2 TO ADDR IN SCR2 

:SET CHAR COUNT EQ 1 

;ADD 2 TO ADDR IN SCR2 

.-SET LINE BIT IN BAR 

;]NC PTR TO VPTSB FOR NtXT TERM 

.-INCREHENT CHANNEL NO. 

;ROTATE LINE NO. HASK TO NEXT PCS. 

;D0 NEXT TERH. ON SAME OHll 

.•DEC COUNT OF DHll'S 

.-BRANCH IF ALL DONE 

;SET UP FOR NEXT OHll 

;INC PTR TO EXISTING TERH. TBL. 

;D0 NEXT DHll 



:SAVE CHAR FOR TESTS 21 I ZZ 
.•DELAY FOR HALF DUPLEX 



;CHAR = CONTROL C ? 

;EXIT IF NOT 

.-TEST 24? 

.'EXIT IF NOT 

;YES, SET RETURN ADR 

:RETURN 



eZLAODO LA56 
CZLA00.P11 



2519 

2520 

2521 

2522 

2523 

2524 

2525 

2526 

2527 

2528 

2529 

2530 

2531 

Ibli 

2533 

2534 

2535 

2536 

2537 

2538 

2539 

2540 

2541 

2542 

2543 

2544 

2545 

2546 

2547 

2548 

2549 

2550 

2551 

2552 

2553 

2554 

2555 

2556 

2557 

2558 

2559 

2560 

2361 

2562 

2563 

2564 

2565 

2566 

2567 

2568 

2569 

2570 

2571 

2572 

2573 

2574 



DHll/OJil 
05-AUG-79 



DIAG 
09:18 



HACTll 



3OA(^052) 05-AUG- 
COWON ROUTINES 



79 09:25 



G 5 
PAGE 



58 



SEO 0058 



PRINTJ— THIS ROUTINE IS USED TO DRIVE EACH OF THE tXlSTING TERMINALS 
ON EACH OF THE EXISTING OJllS* (AS DEFINED BY THE SET UP IN 
"ELTAB"). IF IN THE MAINTENANCE MODE. SR BIT 13 CONTROLS 
WHETHER OR NOT ALL DJilS' ARE DRIVEN OR ONLY THE TERMINAL 
UNDER TEST. EACH TERMINAL IS DRIVEN ONE AT A TIME. PRINTJ 
UILL LOOP WAITING FOR THE FIRST ONE TO BE READY TO SEND 
ENTER WITH CHARACTER TO SEND IN RO. 





AAC 777 

WU5 1 Jl 


nni ??A 




PD 1 kIT 1 - 


TCT 

1 0 1 


U J L N 1 f 


Akiy n 1 1 1 c * 

AN T U J 1 I J 




AA1 7tA 








DC w 






\3vJj\JC 


0^?777 

\JjC III 


nponno 


1 7^S^4 




R1 T 
D 1 1 




rHFTK IF <;r 15 1^ ^FT 


AACC1 A 
\1\JJ> lU 


f\(\^LL^ 








ocu 


41 


riFiR nRIUF All TFRMIIMAlC 




lO^OPI 
I U**UC I 








FT HO 




OUTPUT CHAR TO TFRM IIMDFR TFST 


nn55i4 


1040?? 








I NRDV 




ChFCK if AMY INPUT 

V fib \f K 11 nn 1 1 nr w i 


00S51 A 


000745 








RR 


L 1.1/ A 1 ( 


NO RFTURN 


nn55?o 


0?^7?7 

vC J 1 CI 


001 1 ?4 
^w 1 1 C"t 


0001 77 




CMP 


TFMPCH 1177 


YES CKECK IF A RUBOUT 


\Jv J JC\J 


001 








DHL 


FND I TR 


NO RFTUR^J 


0055^0 


0?^7?7 


001 106 

WW 1 1 WW 


000024 

WwVWfc "t 




CMP 


RTNNO #24 

T\ I nnWffWb~ J 


TEST 24? 


0055 ?6 


001004 

WW I ww*f 








BNE 


It 


BRANCH IF NOT 


005540 


01 ?766 

w 1 C f Uw 


01???4 


000014 

WWWw 1 ~ 




MOU 

n w ¥ 


«TERM 14(SP) 


SET RETURN ADR 


005546 


000726 

WWW ' C w 








BR 


ENDITD , 


RETURN TO EXIT TEST PROPERLY 


005550 


0?37?7 

Wb J r C f 


001 106 

WW 1 1 WW 


000021 

wWwWfc 1 


IS: 


CMP 


RTNNO f21 


TEST 21? 


005556 


001004 

WW 1 ww"t 








BNE 


2S 


BRANCH IF NOT 


005560 


012766 

w 1 C * WW 


01 1234 


000014 

WWVW « ~ 




MOV 


#E021B.14(SP) 


SET RETURN ADR 


005566 


000716 

WWW r 1 u 








BR 

w n 


ENDITD 


RETURN TO EXIT TEST PROPERLY 


005570 


0?3727 

wC J f C f 


001 106 

WW I 1 WW 


000022 

WW W W b L 


2$- 


CMP 


RTNNO. 122 


TEST 22? 


005576 


001004 

WW 1 ww"t 








BNE 


3S 


BRANCH IF NOT 


005600 


01 2766 


01 1314 


000014 

WWWW 1 » 




MOV 


IE022B.14(SP) 


SET RETURN ADR 


WW JVVSJ 


000706 

Www f WW 








BR 


ENDITD , 


RETURN TO EXIT TEST PROPERLY 


005610 

WW ^ W 1 w 


0001 37 

WWW 1 J f 


002540 

w Wb 




3S: 


JMP 


TTYlH 


GO UAIT 


005614 


012757 


160010 


001232 


4$: 


MOV 


1160010. SCR1 


INIT ADDR OF FIRST DJll 


0056?? 


012705 


01 7402 






MOV 


IELTAB.R5 


INIT ADDR OF EXISTING TERM TAB 
■COUNT OF DJllS* TO R3 


005626 

WW ^ Wb w 


015703 

w 1^1 W ^ 


001226 

W V 1 W b W 






MOV 


DJCNT.R3 


0056^2 

WW JOJC 


012702 

w 1 C > wC 


000001 

wWVw 1 




5S: 


MOV 


11 ,R2 


INIT CURRENT LINE NO. 


j\j j\j 


005001 

WW J \J\J 1 








CLR 


R1 


'INIT CURRENT CHANNEL NO. 


005640 


013737 


001232 


001234 


6$: 


MOV 


SCR1,SCR2 


■SET SCR2=ADDR OF CURRENT DJll 


005646 


062737 


000004 


001234 




ADD 


f4,SCR2 


;SCR2 IS ADDR OF TCR 


005654 


031502 








BIT 


aR5.R2 


;TEST IF TERMINAL EXISTS 


005656 


001124 








BNE 


15S 


■BRANCH IF NO TERMINAL 


005660 


010277 


175350 






MOV 


R2,aSCR2 


'YES, SET LINE NO. IN TCR 


005664 


162737 


000004 


001234 




SUB 


«4,SCR2 


;SCR2 IS NOW ADDR OF CSR 


005672 


105777 


173336 






TSTB 


ascR2 


;CHECK FOR INPUTS 


005676 


100072 








BPL 


13$ 


; CONTINUE IF NO INPUT 


005700 


062737 


000002 


001234 




ADD 


#2.SCR2 


;SET CHAR BUF REG ADR 


005706 


017737 


173322 


001124 




MOV 


9SCR2.TEMPCH 


;6ET INPUT CHAR 


005714 


042737 


177600 


001124 




BIC 


#1 77600, TEMPCH 


;MASK CHAR 


005722 


023727 


001124 


000177 




CMP 


TEMPCH,#177 


; CHECK CHAR 


005730 


001032 






BNE 


11$ 


; BRANCH IF NOT RUBOUT 


005732 


023727 


001106 


000024 




CMP 


RTNNO, #24 


;TEST 24? 


005740 


001004 








BNE 


7$ 


; BRANCH IF NOT 


005742 


012766 


012224 


000014 




MOV 


#TERM.14(SP> 


:SET RETURN ADR 


005750 


000625 






BR 


ENDITD 


;RETURN TO EXIT TEST PROPERLY 
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2575 


005752 


025727 


001 106 


000021 


74: 


CUP 


2576 


005760 


001004 








BNE 


2577 


005762 


012766 


01 1254 


000014 




nov 


2578 


005770 


000615 








BR 


2579 


005772 


025727 


001 106 


000022 


8S: 


C«P 


2580 


006000 


001004 








BNE 


2581 


006002 


012766 


011514 


000014 




WV 


2582 


006010 


000605 






9S: 


BR 


2585 


006012 


000157 


002540 




10S: 


JNP 


258A 


006016 


025727 


001 124 


000005 


1 1S: 


CUP 


2585 


006024 


001004 








BNE 


2586 


006026 


025727 


001 106 


A A A A ■> t 

000024 




CHP 


2587 


006054 


001 765 








BEQ 


2588 


006056 


01 5757 


A A 4 4 T / 

001 124 


f\f\ 4 4 4 / 

001 1 14 


4 T* 

12>: 


HOV 


2589 


006044 


010046 








HOV 


2590 


A A^ A / ^ 

006046 


AIT ^ A A 

01 2700 


A AAA T ^ 

000036 






HOV 


2591 


AA^ AC 'i 

006052 


1 Atf A A T 

104005 








DELAY 


2592 


AA^AC J 

006054 


All ^ A A 

012600 








NOV 


2593 


006056 


162737 


AAAAA ^ 

000002 


A A 1^7/ 

001234 




SUB 


2594 


A A^ A^ J 

006064 


AC tT^^ 


AA/t/ AA 

000400 


1 7 7 1 y ^ 

1 73142 


1 7* . 

1 3» : 


BIS 


2595 


AAZ. A 7 T 

0060 7 Z 


AAC 7 7 7 

005777 


1 7 7 1 T A 

1 f 51 56 




1 4» : 


T C T 

TST 


2596 


AAi A "7^. 

006076 


1 AAT 7C 

100575 








BPL 


2597 


AA^ 1 AA 

006100 


AX. 1717 


AAAAAA 
000006 


AA 1 7y 

001 254 




AAA 

ADO 


2598 


006106 


A 1 ^ ^ A y 

01 7704 


1 73122 






nOV 


2599 


AA/. i 1 T 

0061 1 2 


A AAT A/ 

000304 








C 1 1 A A 

SWAB 


2600 


0061 14 


Ay T 7 Ay 


1 777AA 

1 77760 






BI C 


2601 


AA^ 1 TA 

006120 


ATA/ A 1 








CnP 


2602 


AAX i 

006122 


AA1 ^/ A. 








Due 


2605 


AA^ 1 ^ / 

0061 Z4 


1 1 AA7 7 

1 1 00 r r 


1711 Ay 

1 f 5104 






H Atf D 

nOVB 


260A 


AAi 1 TA 

006 1 50 


AAC T A 1 

005201 






1 5»: 


1 NC 


2605 


AAX. 1 T ^ 

0061 52 


AA^ TAT 

006502 








A5L 


^ ^ Ai 

2606 


A A^ IT/ 

0061 54 


1 A T 1 y 1 
105£4 1 








D r r 


2607 


AAi 1 

0061 56 


AAC TAT 

005303 








r\c r 
DcC 


2608 


AA^ 1 / A 

0061 40 


AA 1 AA 1 

001 UOc 








DkiC 

oNt 


^6U9 


AA^. 1 y ^ 
0061 HC 


AAA 1 T 7 
0001 3^ 


005*»52 






Jnr 


2610 


AAA. 1 / A 

006146 


AA 5 7X7 

062 rjf 


AAAA 1 A 

OUUO 1 0 


OUI 252 


lo>: 


4r\A 
ADD 


261 1 


AAA 1 C y 

0061 54 


005f 25 








T C T 


cO 1 C 


UUO 1 ?0 


AAAAnC 
UUUOc? 








RD 


2615 














26U 














2615 














2616 


006160 


000400 






CHARAC: 


.BLKB 



H 5 
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SfcO 0059 



RTNN0.f21 


TEST 21? 


8S 


BRANCH IF NOT 


#E021B,14(SP) 


SET RETURN ADR 


ENDITO 


RETURN TO EXIT TEST PROPERLY 


RTNNO,«22 


TEST 22? 


10S 


BRANCH IF NOT 


iE022B.14(SP) 


SET RETURN ADR 


ENDITD 


RETURN TO EXIT TEST PROPERLY 


ITYlH 


GO TO CONTROL 


TEHPCH.f5 


CHAR = CONTROL-C ? 


12$ 


BRANCH IF NOT 


RTNN0.I24 


TEST 24' 


9S 


YES. RETURN TO TEST 


TEHPCH.REPT 


SAVE CHAR FOR TESTS 21 ft 22 


RO,-(SP) 


SAVE RO 


f 50. ,R0 


DELAY FOR HALF DUPLEX 


ISP)*.R0 


A ^ ^ V A ^ A A 

.RESTORE RO 


ll'2,SCR2 


A ^ ^ ^ V WK A &K ^ A ft A A W ^% A 0^ A V ft ■ V 

■RESET PROPER ADR FOR PRINT 


Mntvtt A(*/*nT 

f BI T8,aSCR2 


.START TRANSMITTER SCANNER 


ascR2 


•CHECK STATE OF CSR 


14S 


A A ftfti^il ff^ h> ^ft ff V V ^ A ft A A V A ^ ft A u 

BRANCH IF XHITTER NOT READY 


#6.SCR2 


-READY, SCR2 NOU=ADDR OF TBUF 


aSCR2,R4 


;GET CONTENTS OF TBUF 


R4 




u4^^^^A a^j 

#1 77760, R4 


;SAVE ONLY LINE NO. 


R4,R1 


ff^ P ^IdA^ ^^ftftflftj^ A V ^ ft ■ ^ A A A Vftl^ 

;BE SURE SCANNER IS ON CORRECT LINE 


6S 


0% A ftAB^aa ft! 0^ V V A u ft ^ ft • ftl 

;BRANCH IF NOT, TRY AGAIN 


A A ^ ^ A T 

R0,aSCR2 


A ft A V #^ i.r aflV^MS ^Aift A 

;LOAD TBUF WITH CHAR 


R1 


ff ft 1 ^ A ^ ^ft ^ftlV %ftl^ ftl A 

; INCREMENT LINE NO. 


R2 


;SET LINE NO. TO NEXT POSITION 


6S 


V ^ ft A A K> V ^ ^ ■ ^ ft A A ■ <1 4 V ^ A ft 1 r 

;IF CARRY IS CLEAR DJil IS DONE 


R5 


A ^ ^ ^ I i ft i Y A r A 1 4 4 ^ 

;OEC COUNT OF DJilS 


16S 


;BRANCH IF NOT DONE 


ENDIT 


;DONE 


#10,SCR1 


;SET SCR1 TO ADDR OF NEXT DJil 


(R5)* 


;SET R5 TO NEXT ELTAB ENTRY 


cc 


• TA f\A klCVT f\l11 

; bU DU NbX 1 DJil 


256. 


; CHARACTER STORAGE FOR OUTPUT 
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2617 

2618 

2619 

2620 

2621 

2622 

2623 

262A 

262S 

2626 

2627 

2628 

2629 

2630 

2631 

2632 

2633 

2634 006560 

2635 006562 

2636 006564 

2637 006566 

2638 006570 

2639 006572 

2640 006576 

2641 006602 

2642 006604 

2643 006610 

2644 006612 

2645 006614 

2646 006616 

2647 006620 

2648 006622 

2649 006624 

2650 006626 

2651 006630 

2652 006632 
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SEQ 0060 



.SBTTL PRINTER TESTS 



XXXXXXXXXX 

PTO — DATA PATH TEST FOUR LINES OF ALTERNATING 

AND "U" ARE PRINTED. OUT TO THE GIVEN PAPER 
yiDTH THE PATTERN WILL APPEAR AS FOLOUS. 



000000 
006634 

104012 
104002 
017654 

012703 025125 
012702 000020 
010300 

013701 001112 

104011 

000300 

005301 

001374 

000303 

104006 

005302 

001365 

104001 

000763 





•u*u*u 


•u*u*u 






u*u«u* 


u*u*u« 






•u*u*u 


•u*u*u 






u*u*u* 


u«u*u* 




■XXXXXXXXXX 






PTO: 


0 




TEST NUMBER 




PT1 




NEXT TEST 




PRTHDR 




PRINT TEST HEADER 




TtPEH 




PRINT COLUMN HES6 




HDRO 






1$: 


NOV 


i'"U*.R3 


SET FIRST CHAR PAIR 




nov 


#16.,R2 


SET LINE COUNT 


2$: 


NOV 


R3.R0 


SET CHAR PAIR 




NOV 


WIDTH, Rl 


SET COLUMN COUNT 


5$: 


PRINTC 




•PRINT CHAR 




SWAB 


RO 


■SET NEXT CHAR 




DEC 


Rl 


•DEC COLUMN COUNT 




BNE 


31 


FINISH LINE 




SUAB 


R5 


SET NEXT START CHAR 




CRLF 




CR-LF 




DEC 


R2 


DEC LINE COUNT 




BNE 


2$ 


FINISH TEST 




CHAIN 




ALL DONE. EXIT 




BR 


2$ 


;REPEAT TEST 
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2655 
265A 
2655 
2656 
2657 
2658 



2659 


00665A 


000001 




2660 


006656 


006756 




2661 


0066A0 


104012 




2662 


006642 


012701 


000040 


2665 


006646 


012702 


AAA 4 A A 

000100 


2664 


006652 


012705 


A A A 4 1 A 

000140 


2665 


006656 


f\ 1 A 4 A A 

010100 




2666 


006660 


A A i 7 T '7 

004757 


A A Z 7 i 

006726 


2667 


006664 


A 1 A ^ A A 

010200 




2668 


006666 


A A i ^ T 7 

004757 


A A Z ^ ^ A 

006726 


2669 


006672 


A 4 ^ ^ A J 

012704 


A A A A A V 

000005 


2670 


006676 


Ai A T AA 

010500 




2671 


006700 


1 A i A 1 1 

10401 1 




2b72 


006702 


A A C T A i 

005304 




2675 


006704 


AA 1 1 7C 

001 375 




2674 


AAi TA* 

006706 


1 A y A A^ 

104006 




2675 


006710 


122122 




2676 


AA^ 71^ 

006712 


1 AC 7^ 1 

1 05723 




2677 


AAA. 7 1 i 

006714 


A ^ A * ^ 7 

020327 


A AA T AA 

000200 


2678 


006 f^U 


1 03f 50 






AA^ 7'51 

006 


1 A/ AA1 

1 04U01 




2680 


AAX. 7^/ 

006r ^4 


AAA7/ ^ 

000^46 




2681 








cOOc 


UUO r CD 


\J \ CI UH 


Ul/wV/U J 


2685 


006752 


104011 




2684 


006754 


005504 




2685 


006756 


001575 




2686 








2687 


006740 


012700 


000040 


2688 


006744 


104011 




2689 








2690 


006746 


012700 


000040 


2691 


006752 


104011 




2692 


006754 


000207 
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PRINTER TESTS SEO 0061 

.'XXXXXXXXXX 

iPTI — PRINTER CHARACTER TEST — PRINTS ALL PRINTABLE CHARACTERS 
•XXXXXXXXXX 



PT1 : 


1 




.•TEST NUnBER 




PT2 




;NEXT TEST 




PRTHDR 




;PRINT TEST HEADER 


IS: 


nov 


«40.R1 


; SPACE TO R1 




nov 


#100. R2 


:a TO R2 




nov 


#140, R5 


;\ TO R5 


2S: 


nov 


R1 ,R0 


;FIRST CHAR TO RO 




JSR 


PCSPSP 


;SEND TWO SPACES 




BOV 


R2,R0 


; SECOND CHAR TO RO 




JSR 


PCSPSP 


:SEND TUO SPACES 




nov 


«5,R4 


:CHAR COUNT TO R4 




nov 


R5,R0 


.•THIRD CHAR TO RO 


5S: 


PRINTC 




.•PRINT CHAR 




DEC 


R4 


.•THREE TinES ? 




BNE 


5S 


;BRANCH IF NOT 




CRLF 




; CR-LF 




cnPB 


(R1 )*.(R2)* 


;SET NEXT CHARS 




TSTB 


IR5)* 






CBP 


M ^ A A 

R5,V200 


: CHECK IF ALL DONE 




BLO 


2S 


.'BRANCH IF NOT 




CHAIN 




:EXIT TO NEXT TEST 




BR 


IS 


;REPEAT TEST 


Srir : 


nUV 




• CCT DO 1 kiT rnilkJT 


IS: 


PRINTC 




.•PRINT CHAR 




DEC 


R4 


:DEC PRINT COUNT 




BNE 


IS 


: FINISH CHAR 


SP2: 


nov 


#40. RO 


.•SPACE TO RO 




PRINTC 




;PR1NT FIRST SPACE 


SPC: 


nov 


#40, RO 


; SPACE TO RO 




PRINTC 




; PRINT SECOND SPACE 




RTS 


PC 


; RETURN 
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2693 .-XXXXXXXXXX 

2694 ; 

2695 :PT2 — NON-PRINTING CHARACTER TEST. THIS TEST 

2696 ; PRINTS THE OCTAL CODE fOLLOUED BY THE HNEHONIC 

2697 : OF ALL NON-PRINTING CHARACTERS. FOLLOWING EACH 

2698 : HNEnONIC, THE PRINTER IS DRIVEN BY THE NON-PRINTING 

2699 ; CODE (000 THROUGH 037 PLUS 177). ALL CONTROL CHARACTERS 

2700 : (INCLUDING THOSE FOR OPTIONS) WILL BE SKIPPED. 

2701 : REFER TO THE DOCUMENT FOR A LIST OF THOSE PRINTED. 
2702 

2703 .-XXXXXXXXXX 

2704 





0U6r 56 
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■ 
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371 T 
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PDIMT ruAD 
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nH 




37H 
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Afll Z7r 
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41 
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571 A 
CI \ 0 


nn70i 5 

UUr U 1 C 


A557AT 
\JCC 1 w J 
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UUwUvc 
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5717 

CI \ 1 


\l\jiv 1 O 
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74 

1 9 


VF^ ^FT MFVT THAR 


571 R 


Vv 1 \JC\J 




wwwwU"* 




TMP 

unr 




THAR - FOT'' 

I, Finn C U 1 • 


?71 0 
ci\y 




Uw 1 *• 1 "* 










VF^ ^FT MFXT THAR 


c 1 Cv 




\JCC 1 w J 


0000^^ 




TMP 


R5 


THAR s FSC 


57?1 
C 1 c \ 




WW 1 1 c 








71 


yfs ^ft nfxt Char 


C 1 cc 


WW ' W J** 


05570? 


000007 

WWW WW r 




CMP 


JV7 R3 


CHAR = BELL'' 


CI Cj 


007040 

WW' WHW 


00100? 






BNE 


5S 


BRANCH IF NOT A BELL 


C 1 £•« 


wV/f w*ft 




OOOOPO 

vvUwC w 




NOV 


120 R5 


SET NEXT CHAR 


CI Cj 


WW f W*tU 




OOOOLO 


5&- 


CMP 


#40 R3 


IS IT THE LAST' 


CI Co 


ftft7ns? 

wwf wye 










8i 

w V 


BRANCH IF NO 


CI CI 


WW f w y 








BR 


1 1S 


YES OUTPUT LAST CHAR (177) 


C 1 CO 


WW * w 


OOSPO^ 




• 


INC 


R3 


■SKIP CHAR 


c ' cy 


Uwi wOw 


OOSPO^ 




7(- 


INC 


R3 


■SKIP CHAR 


C 1 j\l 


WW ' wOC 


ni n^no 

U 1 U JvU 






nuv 


n « n w 


NON-PRINTARlF CHAR TO RO 


?7^1 

CI J > 


WW f wQH 


\J \ CI \JH 


00000^ 






«3 R4 


■A COUNT OF 3 TO R4 


2732 


007070 


104011 




9S: 


PRINTC 




;DRIVE PRINTER WITH NON-PRINTABLE CHAR 


2733 


007072 


005504 






DEC 


R4 


IDECREHENT COUNTER 


2734 


007074 


001375 






BNE 


9S 


■BRANCH IF NOT ZERO (5 TIMES) 


2735 


007076 


005203 






INC 


R5 


; INCREMENT CHAR. CODE 


2736 


007100 


005302 






DEC 


R2 


;DEC. GROUPS PER LINE COUNTER (3) 


2737 


007102 


001404 






BEQ 


10S 


;BRANCH IF ZERO 


2738 


007104 


004757 


006740 




JSR 


PC.SP2 


;SENO 3 SPACES 


2739 


007110 


104011 






PRINTC 






2740 


007112 


000731 






BR 


5S 


; CONTINUE 


2741 


007114 


104006 




10S: 


CRLF 




;SEND A CR.LF 


2742 


007116 


000725 






BR 


2S 


;G0 DO NEXT LINE 


2743 


007120 


012704 


000003 


IIS: 


MOV 


#5.R4 


;A 3 COUNT TO R4 


2744 


007124 


012700 


000177 




MOV 


#177. RO 


;A DEL TO RO 


2745 


007130 


104011 




12t: 


PRINTC 




;PRINT CHAR 


2746 


007132 


005504 






DEC 


R4 


:DECREMENT COUNTER 


2747 


007134 


001575 






BNE 


12S 


.•BRANCH IF NOT ZERO 


2748 


007136 


104006 






CRLF 




.-SEND A CR. LF 
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Sf 0 OOf^ ' 



27<,9 

2750 

2751 

2752 

2755 

275A 

275S 

2756 

2757 

2758 

2759 

2760 

2761 

2762 

2765 

2764 

2765 

2766 

2767 

2768 

2769 

2770 

2771 

2772 

2775 

2774 

2775 

2776 

2777 

2778 

2779 

2780 



007K0 
007142 



007144 
007152 
007160 
007166 
007174 
007202 
007210 
007216 
007224 
007252 
007240 
007246 
007254 
007262 
007270 
007276 
007504 
007512 
007520 
007526 
007554 
007542 
007550 
007556 
007564 
007572 
007400 



104001 
000710 



050060 
046125 
051440 
020062 
050060 
045505 
042040 
020061 
051060 
051105 
042040 
020064 
051060 
045501 
051440 
020067 
051460 
047101 
042440 
020062 
051460 
020125 
045440 
020066 
051460 
020125 
042040 
007406 



CHAIN 

BR It 



:Chain to next test 
;repeat test 



020060 
050060 
044117 
051440 
020066 
051060 
042514 
042040 
020062 
051060 
051505 
042040 
020065 
051060 
047151 
042440 
020060 
051460 
020115 
051440 
020064 
051460 
020125 
051040 
020067 
055461 
046105 



047040 LINE2: 
020061 
050060 
054124 
040440 
020060 
051060 
050505 
042040 
020065 
051060 
052105 
047040 
020066 
051060 
041124 
041440 
020061 
051460 
041125 
045040 
020065 
051460 
020125 
052440 
020067 
040 



.ASCII /OOO NUlOOl SOH002 STX/ 



.ASCII /006 ACK020 DLE021 DCI/ 



.ASCII /022 0C2025 0C5024 DC4/ 



.ASCII /025 NAK026 SYN027 ETB/ 



.ASCII /050 CAN031 EH 052 SUB/ 



.ASCII /054 FS 055 6S 056 RS / 



.ASCII /037 US 177 DEL / 



.EVEN 



CZLADDO LA56 
tZLADD.PIl 



2781 

2782 

2785 

2784 

2785 

2786 

2787 

2788 

2789 

2790 

2791 

2792 

2795 

2794 

2795 

2796 

2797 

2798 

2799 

2800 

2801 

2802 

2805 

280A 

2805 

2806 

2807 

2808 

2809 

2810 

2811 

2812 

2815 

28U 

2815 

2816 

2817 

2818 

2819 

2820 



DHll/DJil 
05-AU6-79 



DIAG 
09:18 
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n 5 

09:25 PAGE 64 



SEO 0064 



007406 
007410 
007412 
007414 
007420 
007424 
007450 
007452 
007454 
007456 
007442 
007444 
007446 
007450 
007456 
007462 
007466 
007470 
007472 
007476 
007500 
007502 
007510 
007516 
007520 
007522 
007524 



PT5 — CARRIAGE RETURN TEST — 

THE LINE CONSISTS OF A STRING OF O'S AND 
X'S. FIRST. THE O'S ARE PRINTED OUT TO THE LAST 
COLUHN WITH A SPACE SEPARATING EACH. THEN THE 
CARRIAGE IS SPACED TO THE FIRST BLANK SPACE. AND X 
PRINTED AND THE RETURNED TO THE MARGIN. THIS 
PROCESS IS CONTINUE UNTIL ALL SPACES BETWEEN 
THE ZEROES HAVE BEEN FILLED. 



XXXXXXXXXX 



000005 






PT5: 


5 




007526 








PT4 




104012 








PRTHDR 




005057 


001116 




IS: 


CLR 


SPCNT 


015701 


001112 






NOV 


WIDTH, R1 


012700 


000117 




2S: 


nov 


•1 1 7.R0 


104011 








PRINTC 




005501 








DEC 


Rl 


001404 








BEQ 


5$ 


004757 


006746 






JSR 


PC ,SrC 


005501 








DEC 


Rl 


001567 








BNE 


2S 


104014 






5S: 


CR 




012757 


000001 


001116 




nov 


#1 .SPCNT 


015701 


001116 




4S: 


HOV 


SPCNT, Rl 


004757 


006746 




51: 


JSR 


PCSPC 


005501 








DEC 


Rl 


001574 








BNE 


5S 


012700 


000150 






nov 


1150. RO 


104011 








PRINTC 




104014 








CR 


#2, SPCNT 


062757 


000002 


001116 




ADD 


025757 


001116 


001112 




CHP 


SPCNT ,wn 


105757 








BLO 


4$ 


104010 








LF 




104001 








CHAIN 


1$ 


000755 








BR 



:TEST NUMBER 

;NEXT TEST 

;PRINT TEST HEADER 

; CLEAR SPACE COUNTER 

.•POSITION COUNTER TO Rl 

;"0" TO RO 

; PR I NT THE "0" 

.-DECREFIENT POSITION COUNTER 

;BRANCH IF 0 

'PRINT A SPACE 

■DECREMENT POSITION COUNTER 

: BRANCH IF NOT ZERO 

;SEND CR 

.•SPACE, COUNTER SET TO 1 
;N0. OF SPACES TO Rl 
•PRINT SPACE 

■DECREMENT SPACE COUNTER 
.•BRANCH IF NOT ZERO 
;"X" INTO RO 
.•PRINT "X" 
;SEND CR 

;INCREr^ENT SPACE COUNT BY 2 

; COMPARE POSITION COUNTER WITH COLM. COUNT 

:BRANCH IF LOWER 

.•SEND lF 

;CHA1N TO NEXT TEST 
;REPEAT TEST 
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2821 
2822 
2825 
282^ 
2825 
2826 
2827 
2828 
2829 
2830 

2831 007526 000004 

2832 007530 007704 

2833 007532 104012 

2834 007534 012737 

2835 007542 013701 

2836 007546 012702 

2837 007552 004737 

2838 007556 013701 

2839 007562 104010 

2840 007564 005301 

2841 007566 001375 

2842 007570 006337 

2843 007574 022737 

2844 007602 001406 

2845 007604 112200 

2846 007606 104011 

2847 007610 112200 

2848 007612 104011 

2849 007614 104014 

2850 007616 000757 

2851 007620 013701 

2852 007624 004737 

2853 007630 104010 

2854 007632 104001 

2855 007634 000737 
2856 

2857 007636 112200 

2858 007640 104011 

2859 007642 112200 

2860 007644 104011 

2861 007646 005741 

2862 007650 012700 

2863 007654 104011 

2864 007656 005301 

2865 007660 001375 

2866 007662 104014 

2867 007664 000207 
2868 

2869 007666 030460 

2870 007674 034060 

2871 007702 030060 
2872 
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09:23 



N 5 
PAGE 



PT4 MULTIPLE LINE FEED TEST — 63 LINE FEEDS ARE 

SENT WITH A REFERENCE LINE AT THE START AND END. 
A NUMBER IS PRINTED WHICH INDICATES THE NUMBER OF 
FEEDS THAT WILL BE ISSUED BEFORE THE NEXT 
NUMBER OR REFERENCE LINE IS PRINTED. 

XXXXXXXXXX 



LINE 







PT4: 


4 




TEST NUMBER 








PT5 




NEXT TEST 








PRTHDR 




PRINT TEST HEADER 


000001 


001132 


IS: 


MOV 


ll.LFCNT ; 


LINE FEED COUNT TO 1 


001112 






MOV 


WIDTH, Rl ; 


COLUMN COUNT TO Rl 


007666 






MOV 


«LINE3,R2 : 


ADDR OF NUMBER FIELD TO R2 


007636 






JSR 


PC, REF 


PRINT REFERENCE LINE 


001132 




2S: 


MOV 


LFCNT,R1 


LINE FEED COUNT TO Rl 






3S: 


LF 




SEND LF 








DEC 


Rl ! 


DECREMENT COUNTER 








BNE 


3S 


BRANCH Ir NOT TcT U 


001132 






ASL 


LFCNT 


DOUBLE LINE FEED COUNT 


000100 


001132 




CMP 


«BIT6.LFCNT 


TEST IF COUNT IS 32 






BEQ 


4S 


BRANCH IF =32. END 








MOVB 


(R2)«,R0 


NUMBER TO RO 








PRINTC 


PRINT IT 








MOVB 


(R2)«,R0 


.NUMBER TO RO 








PRINTC 




■PRINT IT 








CR 




•SEND CR 








BR 


2S 


;DR1VE THE LINEFEEDS 


001 1 1 2 




4S: 


MOV 


WIDTH, R1 


; COLUMN COUNT TO R1 


007636 






JSR 


PC. REF 


;SEND END REFERENCE LINE 






1 r 
LF 




; jcNU Lr 








CHAIN 












BR 


IS 


;REPEAT TEST 






REF: 


MOVB 


(R2)+.R0 


; NUMBER TO RO 








PRINTC 




;PRINT IT 








MOVB 


(R2)*,R0 


; NUMBER TO RO 








PRINTC 




jPRINT IT 








TST 


-tRI) 


.•DECREASE COUNTER BY 2 


000137 






MOV 


#137. RO 


;DASH (-) TO RO 




IS: 


PRINTC 




;PRINT IT 








DEC 


Rl 


; DECREMENT COLUMN COUNTER 








BNE 


IS 


;BRANCH IF NO ZERO 








CR 




;SEND CR 








RTS 


PC 


: RETURN 


031060 


032060 


L1NE3: 


.ASCII 


/01020408163200/ 




033061 


031063 
















.EVEN 
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2m 

287<, 

2876 
2877 

2878 00770A 

2879 007706 

2880 007710 

2881 007712 

2882 0V7]b 

2883 007720 

2884 00772A 

2885 007726 

2886 007730 

2887 007732 

2888 007736 

2889 007740 

2890 007742 

2891 007750 

2892 007752 

2893 007756 

2894 007760 
28<'5 007762 

2896 007766 

2897 007772 

2898 007774 

2899 007776 

2900 010000 

2901 010002 

2902 010006 

2903 010012 

2904 010014 

2905 010016 

2906 010020 

2907 010022 

2908 010024 

2909 01 "'30 

2910 Oi^u32 

2911 010036 

2912 010040 
2915 010044 
29U 010046 

2915 010050 

2916 010052 

2917 010056 

2918 010062 

2919 010064 

2920 010066 

2921 010070 

2922 010072 
2925 010076 

2924 010100 

2925 010104 

2926 010106 
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SEO 0066 



xxxxxxxxxx 

PT5— SINGLE LINE fEED TEST — TESTS THE LINE fEEO 

CAPABILITY FROM ALL COLUMNS. 
XXXXXXXXXX 



000005 




PT5: 


5 




TEST NUWER 


010110 






PT6 




NEXT TEST 


104012 






PRTHDR 




PRINT TEST HEADER 


013701 


001112 


1$- 


HOV 


WIDTH. R1 ; 


COLUHN COUNT TO Rl 


005741 






TST 


-(R1) 


DECREASE BY 2 
•0' TO RO 


012700 


000060 




HOV 


«60,R0 


104011 




y». : 


PRINTC 




SEND 0 


005301 






DEC 


Ri ! 


DECREHENT COLUMN COUNTER 


001375 






BNE 


2t 


BRANCH IF NOT ZERO 


012700 


000062 




i^OV 


«62,R0 


SEND A 2 


104011 






PRINTC 






104011 






PRINTC 




SEND A SECOND TWO 


023727 


001112 000204 




CUP 


UIDTH.»132. 


COHPARE COLUHN COUNT 


001404 






BEQ 


3S 


BRANCH IF EQ 152 


012700 


005410 




HOV 


f3410,R0 


DELAY 1.8 SEC 


104003 






DELAY 






000407 






BR 


5t 




012700 


000065 


5S: 


HOV 


«65,R0 


5'S TO RO 


012701 


000100 




HOV 


#100, RI 


64 TO COUNTER 


104011 




4S: 


PRINTC 




SEND CHARACTER 


005301 






DEC 


R1 


DECREHENT COUNT 


00^375 






BNE 


4S 


BRANCH IF NOT ZERO 


104006 
013701 




5$: 


CRLf 




•SEND A CR.LF 


001112 




HOV 


WIDTH. RI 


NO. COLUHNS TO Rl 


012700 


000154 


6S: 


HOV 


#134, RO 


BACKSLASH TO RO 


104011 






PRINTC 




;SEND IT 


104010 






LF 




•SEND LF 


005301 






DEC 


Rl 


; DECREHENT COUNTER 


001372 






BNE 


6S 


;BRANCH IF NOT ZERO. 


104014 






CR 




iSEND CR 


004737 


010052 




JSR 


PC.PT5AL 


;SEND REF LINE #1 


104006 






CRLF 




;SEND A CR.LF 


012700 


001750 




HOV 


#1750, RO 


; DELAY 1 SEC 


104003 






DELAY 






004757 


010052 




JSR 


PC.PT5AL 


;SEND A SECOND REF. LINE 


104006 






CRLF 




;SEND A CR.LF 


104001 






CHAIN 




:CHAIN TO NEXT TEST 


000720 






BR 


IS 


;REPEAT TEST 


015701 


001M2 


PT5AL: 


HOV 


WIDTH. Rl 


; COLUHN COUNT TO Rl 


012700 


000061 




HOV 


#61 .RO 


Mill 

; 1 TO RO 


104011 




It: 


PRINTC 




.■PRINT RO 


005501 






DEC 


Rl 


: DECREHENT COUNTER 


001407 






BEQ 


2% 


:BRANCH IF=0 


005200 






INC 


RO 


;1NCREHENT CHARACTER 
;COHP CHAR TO "9" 


020027 


000071 




CHP 


R0.#71 


101771 




6L0S 


IS 


: BRANCH IF LOWER OR SAME 


012700 


000060 




HOV 


#60, RO 


; RESET CHAR TO "0" 


000766 




BR 


IS 


.•CONTINUE 


000207 




2i: 


RTS 


PC 


:FINISHED. RETURN TO CALLER 



CZLADDO LA36 Dh11/DJ11 D1A6 
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2927 
2928 
2929 
2950 
2931 
2932 
2933 
2934 
2955 
2936 
2957 

2958 010110 000006 

2959 010112 010272 
29A0 0101 U 10<i012 

2941 010116 015701 001112 

2942 010122 005741 

2945 010124 012700 000060 

2944 010150 104011 

2945 010152 005501 

2946 010154 001575 

2947 010156 012700 000062 

2948 010142 104011 

2949 010144 104011 

2950 010146 025727 001112 

2951 010154 001404 

2952 010156 012700 005410 
2955 010162 104005 

2954 010164 000407 

2955 010166 012700 000063 

2956 010172 012701 000100 

2957 010176 104011 

2958 010200 005501 

2959 010202 001575 

2960 010204 104006 

2961 010206 015701 001112 

2962 010212 012700 000154 

2963 010216 104011 

2964 010220 012700 000010 

2965 010224 104011 

2966 010226 012700 000057 

2967 010252 104011 

2968 010254 005501 

2969 010256 001565 

2970 010240 104010 

2971 010242 104014 

2972 010244 004757 010052 

2973 010250 104006 

2974 010252 012700 001750 

2975 010256 104003 

2976 010260 004737 010052 

2977 010264 104006 

2978 010266 104001 

2979 010270 000712 
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PT6— BACKSPACE TEST — A REFERENCE LINE SUCH AS IN 
TEST PT5 IS PRINTED. THE SECOND LINE CONSISTS 
OF PRINTING A BACKSLASH, BACKSPACE AND FORWARD 
SLASH COnBlNATION OUT TO THE GIVEN COLUMN WIDTH. 
THIS LINE IS THEN FOLLOWED BY THE SAKE TWO REFERENCE 
LINES AS PRINTED IN TEST PT5. 

XXXXXXXXXX 

PT6: 

1$: 

2S: 



SEQ 0067 



000204 



31: 
4S: 

5S: 
6S: 



fc 




TEST NUMBER 


PT7 




NEXT TEST 


PRTHDR 




PRINT TEST HEADER 


nov 


WIDTH. R1 


COLUnN COUNT TO Rl 


TST 


-(Rl) 


DECREnENT BY 2 


nov 


#60. RO 


"0" TO RO 


PRINIC 




SEND 0 


DEC 


Rl ', 


DECREMENT COLUnN COUNTER 


BNE 


2S 


BRANCH IF NOT ZERO 


nov 


«62.R0 


"2" TO RO 


PRINTC 




SEND A "I" 


PRINTC 




SEND A SECOND "2" 


cnp 


WIDTH, 41132. 


COnPARE COLUnN COUNT 


BEQ 


3$ 


BRANCH IF EQ 152 


nov 


*3410.R0 


,DELAY 1.8 SEC 


DELAY 






BR 


51 




nov 


#65, RO 


5'S TO RO 


nov 


#100,R1 


;64 TO COUNTER 


PRINTC 




•SEND CHAR 


DEC 


Rl 


DECREnENT COUNTER 


BNE 


4t 


CONTINUE IF NOT DONE 


crlf 




•SEND A CR,LF 


nov 


WIDTH, Rl 


•coLunn COUNT to ri 


nov 


#154, RO 


BACKSLASH TO RO 


PRINTC 




,SEND IT 


nov 


#10, RO 


•BACKSPACE TO RO 


PRINTC 




SEND IT 


nov 


#57. RO 


FORWORD SLASH TO RO 


PRINTC 




;SEND IT 


DEC 


Rl 


•END OF PAPER 


BNE 


6S 


•BRANCH IF NO 


LF 




;SEND LF 


CR 




;SEND CR 


JSR 


PC.PT5AL 


;SEND REF LINE #1 


CRLF 




;SEND A CR,LF 


nov 


#1750, RO 


rDELAY 1 SEC 


DELAY 






JSR 


PC,PT5AL 


;SEND SECOND RE^ LINE 


CRLf 


;SEND A CR,LF 


CHAIN 




;CHAIN TO NEXT TEST 


BR 


IS 


;REPEAT TEST 



_J 
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79 09:25 



D 6 
PAGE 



SEO 0068 



006 



PT7- 



PT7: 



IS 
21 
3S 



2980 
2981 
2982 
2983 
298A 
2985 
2986 
2987 
2988 
2989 
2990 

2991 010272 000007 

2992 010274 010504 

2993 010276 104012 

2994 010300 012703 000002 

2995 010504 013701 001112 

2996 010310 012700 000115 

2997 010514 104011 

2998 010316 005301 

2999 010520 001404 

3000 010322 004737 006746 

3001 010326 005301 

3002 010330 001367 

3005 010352 022705 000002 4S: 

5004 010536 001005 

5005 010540 104014 5$: 

5006 010542 005305 

5007 010544 000757 

5008 010546 005705 6$: 

5009 010350 001373 

3010 010352 104006 

3011 010354 005725 

3012 010356 015701 001112 7$: 

5013 010562 004757 006746 8S: 

5014 010566 005501 

5015 010570 001405 

5016 010572 012700 000100 

5017 010576 104011 

5018 010400 005301 
3019 010402 001367 

5020 010404 022705 000002 9S: 

5021 010410 001005 

5022 010412 104014 10$: 
5025 010414 005505 

5024 010416 000757 

5025 010420 005705 lit: 

5026 010422 001573 

3027 010424 104006 

3028 010426 005723 

3029 010430 013701 001112 12S: 
5050 010434 012700 000046 13$: 

5031 010440 104011 

5032 010442 005301 
3055 010444 001404 
3054 010446 004737 
5035 010452 005301 



xxxxxxxxxx 



OVERPRINT TEST— A ROW OF ALTERNATING H'S AND 
SPACES ARE PRINTED. OUT TO THE LAST COLUHN AND OVERPRINTED TyiCE. 
A SECOND LINE OF ALTERNATING SPACES AND "a'S" IS THEN 
SENT 5 TIMES AS THE FIRST LINE. THIS IS fOLLOUED 
BY A THIRD AND FINAL LINE OF ALTERNATING 
AND SPACES. 



XXXXXXXXXX 



7 

PT10 
PRTHDR 

nov 

MOV 

MOV 

PRINTC 

DEC 

BEQ 

JSR 

DEC 

BNE 

cnp 

BNE 

CR 

DEC 

BR 

TST 

BNE 

CRLF 

TST 

HOV 

JSR 

DEC 

BEQ 

HOV 

PRINTC 

DEC 

BNE 

CHP 

BNE 

CR 

DEC 

BR 

TST 

BNE 

CRLF 

TST 

nov 

HOV 

PRINTC 

DEC 

BEQ 

JSR 

DEC 



*2.R5 
WIDTH, R1 
•115.ro 

R1 
4$ 

PC.SPC 

R1 

5$ 

i2,R5 
6$ 

R5 
2$ 
R5 
5$ 

(R3) + 

WIDTH, R1 

PCSPC 

R1 

9$ 

1100. RO 

Rl 
8$ 

«2,R3 
11$ 

R5 
7$ 
R3 
10$ 

(R3)* 
WIDTH, Rl 
#46. RO 

Rl 
14$ 

PCSPC 
Rl 



.•TEST NUMBER 

;NEXT TEST 

:PRINT TEST HEADER 

;2 COUNT TO R3 

:N0. OF COLUMNS TO Rl 

:PRINT M 

;END OF LINE 
;BRANCH IF YES 
.•SEND SPACE 
;END OF LINE? 
.-BRANCH IF NO 
;TEST R3 

.•BRANCH IF NOT FIRST TIME 
;SEND CR 

.DECREASE LINE COUNTER 
;REPEAT LINE 
.•THIRD TIME? 
.•BRANCH IF NOT 
.•NEXT LINE 

.•REPEAT COUNTER TO R3 
; COLUMN COUNT TO Rl 
.•SEND SPACE 

; DECREASE COLUMN COUNT 
.•BRANCH IF 0. END OF LINE 
;"a" TO RO 
;SEND IT 

; DECREASE COLUMN COUNT 
;BRANCH IF NOT 0 (NOT END) 
;END OF LINE, FIRST TIME? 
.•BRANCH IF NOT 
.■SEND CR 

;DECREASE LINE COUNTER 

.•REPEAT LINE 

.•TEST IF THIRD REPEAT 

.-BRANCH IF NOT 

;D0 NEXT LINE 

;LINE REPEAT COUNTER TO R3 
.•COLUMN COUNT TO Rl 

TO RO 
'PRINT IT 

•DECREASE COLUMN COUNT 
.•BRANCH IF END 
;SEND SPACE 

.•DECREASE COLUMN COUNT 
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5056 
5057 
5058 
5059 
50A0 
5041 
30A2 
50A5 
SO*.'. 
5045 
5046 



010454 
010456 
010462 
010464 
010466 
010470 
010472 
010474 
010476 
010500 
010502 



001567 
022705 
001005 
104014 
005505 
000757 
005703 
001375 
104006 
104001 
000676 



000002 



14$: 
15»: 

16S: 



BNE 

CHP 

BNE 

CR 

DEC 

BR 

TST 

BNE 

CRLF 

CHAIN 

BR 



15$ 

#2.R5 

16$ 

R5 
12$ 
P5 
15$ 



1$ 



SEO 0069 



BRANCH IF NOT END 
TEST IF FIRST TIME 
BRANCH IF =2. FIRST TIME 
CARRIAGE RETURN 
DECREASE REPEAT COUNTER 
PRINT LINE AGAIN 
TEST IF END. R5=0 
BRANCH IF NOT END 
SEND CR.LF 
CHAIN TO NEXT TEST 
REPEAT TEST 
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5047 
30A8 
5049 
3050 
5051 
5052 
5055 
5054 
5055 
5056 
5057 
5058 
5059 

5060 010504 000010 

5061 010506 010642 

5062 010510 104012 

5065 010512 012701 000056 

5064 010516 012702 000170 

5065 010522 012757 000056 

5066 010550 012700 000110 

5067 010534 104011 

5068 010556 012700 000056 

5069 010542 104005 

5070 010544 005301 
3071 010546 001426 
5072 010550 005502 
5075 010552 001450 

5074 010554 015704 010540 

5075 010560 006204 

5076 010562 006204 

5077 010564 006204 
3078 010566 006204 

5079 010570 010405 

5080 010572 006204 

5081 010574 006204 

5082 010576 006204 
5085 010600 060405 

5084 010602 022702 000074 

5085 010606 003405 

5086 010610 160557 010540 

5087 010614 000745 

5088 010616 060537 010540 

3089 010622 000742 

3090 010624 104006 

3091 010626 012701 000036 
5092 010652 000746 

3093 010634 104006 

3094 010636 104001 

3095 010640 000724 
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PT10— PRINTING fREQUENCt TEST— 120 H'S ARE PRINTFD ON 4 LINES 

50 PER LINE. THE TEST IS SUCH THAT BETWEEN THE FIRST AND SECOND 
"H" A 30 MSEC DELA» IS INTRODUCED. THIS DELAY IS THEN INCREASED 
BETWEEN CHARACTERS OUT TO 60 CHARACTERS IN AN EXPONENTIAL 
MANNER. THE DELAY IS THEN DECREASED IN THE SAME MANNER OUT TO THE 
120TH CHARACTER. THIS DELAY IS CALCULATED AS FOLLOWS; 

NEW DELAY = OLD DELAY C* OR -3 (OLD DELAY/16 ♦ OLD DELAY/128 ) 



SEO 0070 



XXXXXXXXXX 



010540 



PTIO: 


10 






PT1 1 






PRTHDR 




It: 


MOV 


f 3d « R 1 




MOV 


1120. ,R2 




MOV 


050. ,i9*c 


2»: 


MOV 


11 10.R0 




PRINTC 




3S: 


MOV 


V30. ,RU 




DELAY 






f\ c r 

DEC 


D 1 

R 1 




OCA 

DCU 


6» 


4* : 


UCl 


nd 




DCU 


(9 




nOV 






ASH 


D/ 

Km 




ACD 

AsK 


DL 




A5R 


DA 




ACQ 


HM 




MOV 


R4,R5 




ASR 


R4 




ASR 


R4 




ASR 


R4 




ADD 


R4,R5 




CMP 


#60.. R2 




ble 


5S 




SUB 


R5.5S+2 




BR 


2S 


5$: 


ADD 


R5.3S+2 




BR 


2S 


6S: 


CRLF 






MOV 


#56, Rl 




BR 


4S 


7$: 


CRLF 






CHAIN 






BR 


IS 



;TEST NUMBER 
.•NEXT TEST 
.•PRINT TEST HEADER 
;SET R1=30 

.■SET CHAR COUNT = 120 
:SET UP DELAY VALUE 
;"H" TO RO 
;SEND IT 

.•DELAY 

;DEC. COUNT OF CHARS PER LINE 

:BRANCH IF 0, END OF LINE 

.•DECREMENT CHAR COUNTER 

:BRANCH IF END 

;6ET OLD DELAY 

:CAL 1/16 OF OLD DELAY 



;SAVE 1/16 IN R5 

;CAL 1/128 OF OLD DELAY 



;1/16 41/128 TO R5 

;TEST WHICH HALF OF THE 120 CHARS. 

;BRANCH IF LT OR EQ 60 

;6T 51, DECREASE DELAY BY 34 MEC, 

:G0 PRINT AGAIN 

;LT HALF WAY, ADD DELAY OF 34 MEC. 
;G0 PRINT AGAIN 
.•SEND CRLF 
;SET R1=30 

;SEND CR.LF 

;CHAIN TO NEXT TEST 

.REPEAT TEST 
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5096 
5097 
5098 
5099 
5100 
3101 
5102 
5103 

5104 010642 000011 
3105 010644 010674 
5106 010646 104012 
3107 0106SO 012701 000050 

5108 010654 012700 000130 

5109 010660 104011 
3110 010662 104006 
5111 010664 00S301 
3112 010666 001372 
5115 010670 104001 
5114 010672 000766 
5115 

5116 
5117 
5118 
5119 
5120 
5121 
5122 
5125 
5124 

5125 010674 000012 

5126 010676 006560 

5127 010700 104012 

5128 010702 012701 000010 

5129 010706 012700 000007 

5130 010712 104011 

5151 010714 005501 

5152 010716 001575 
5155 010720 104010 

5154 010722 012700 005720 

5155 010726 104003 
3156 

5137 010730 015700 000042 
5158 010754 001405 
5139 010756 000005 
3140 010740 004710 

5141 010742 000240 

5142 010744 000240 
5145 010746 000240 

3144 010750 104001 

3145 010752 000753 
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SeO 0071 



PTll— RIBBON FEED TEST — THIS TEST PRINTS A SINGLE COLUMN 

Of X'S (24 LINES) DOWN THE LEFT HARGIN OF THE PAGE. VISUALLY 
CHECK THE RIBBON REED MECHANISM FOR PROPER OPERATION. 



XXXXXXXXXX 



Pin 



IS: 
2S: 



11 

PT12 

PRTHDR 

NOV 

MOV 

PRINTC 

CRLF 

DEC 

BNE 

CHAIN 

BR 



#50. R1 
#150. RO 



Rl 
2S 



It 



TEST NUMBER 
NEXT TEST 
PRINT TEST HEADER 
SET Rl=24 
SET CHAR = X 
PRINT X 
SEND CR-LF 
DEC COUNT 

BRANCH IF NOT DONE TEST 
CHAIN TO NEXT TEST 
REPEAT TEST 



XXXXXXXXXX 



PT12— PRINTER BELL TEST— THE LAST TEST IN THE 
PRINTER TEST SEQUENCE. THIS TEST OUTPUTS 
EIGHT BELL SIGNALS TO THE PRINTER 

XXXXXXXXXX 



PT12: 


12 




THIS TEST 




PTO 




NEXT TEST 




PRTHDR 




PRINT TEST HEADER 


PT12A: 


NOV 


#10, Rl \ 


COUNTER TO Rl 


It: 


HOV 


#7.R0 


BELL TO RO 




PRINTC 




SEND IT 




DEC 


Rl 


DECREMENT COUNT 




BNE 


It 


BRANCH IF NOT ZERO 




LF 




•SEND LF 




NOV 


#5720, RO 


;DELAY 2 SEC BEFORE RESTARTING 




DELAY 








HOV 


a#42.R0 .-CHECK IF UNDER ACT 11 OR XXDP 




6EQ 


HERE 


; CONTINUE TEST SEQUENCE 




RESET 






LOGICAL 


:JSR 


PC.(RO) 






NOP 








NOP 








NOP 






HERE: 


CHAIN 


;CHAIN TO NEXT TEST 


BR 


PT12A 


:REPEAT TEST 



L 



CZLADOO LA56 
CZLA00.P11 



5U6 

3U7 

3U8 

3U9 

5150 

5151 

5152 

3155 

3154 

3155 

3156 

3157 

3158 

3159 

3160 

3161 

5162 

3165 

5164 

5165 

5166 

5167 

5168 

5169 

3170 

5171 

5172 

5175 

5174 

5175 

5176 

5177 

5178 

5179 

5180 

5181 

5182 

5185 

5184 

5185 

5186 

5187 

3188 

3189 

5190 

5191 

5192 

5195 

5194 



OMll/DJll 
05-AUG-79 



DIAG 
09:18 



flACVll 



010754 
010756 
010760 
010764 
010766 
010770 
010774 
010776 
011004 
011010 
011014 
011016 
011020 
011022 
011024 
011050 
011054 
011040 
011042 
011044 
011046 
011050 
011052 
011054 
011056 
011062 
011070 
011072 
011076 
011102 
011106 
011112 
011114 
011116 
011120 
011122 



000017 
010754 
000157 
000017 
010754 
005057 
104012 
012757 
015701 
013700 
104011 
005501 
001573 
104006 
012702 
015701 
013700 
104011 
005501 
001375 
104014 
005502 
001366 
104010 
005257 
022757 
001345 
005257 
012700 
015701 
012702 
104015 
104002 
017536 
104001 
000725 
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72 



SEO 007^ 



PT17— LIFE TEST 

THIS TEST PRINTS 2 FULL LINES Of EACH PRINTABLE 
CHARACTER AND OVERPRINTS THE SECOND LINE 4 TIMES. 
THIS TEST IS CONTINUOUS RUNNING ONCE INITIATED, 
LOOPING AUTOHATICALLV ON ITSELF. 

END OF PASS COUNT IS CLEARED WHENEVER THE TEST IS RESTARTED. 

xxxxxxxxxx 







DT 1 7D • 

r 1 1 f D : 


1 7 




TF^T MIIMRFP 








DT 1 7Q 






OlUf fo 






iMD 


DT 1 7ft 






DT 1 7 > 

r 1 1 ( • 


1 7 

1 f 












DTI 7B 




NFVT TF^T 


u 1 1 1 <:■« 






ri B 




n FAR PA^^ rniiNT 






DDTunB 




PRIMT TF^T HFADFR 




nni ^^L 


PT 1 7n • 

r 1 III/. 


nuv 


tC^ PFPT 


SET START CHAR 


nn 1 1 1 > 




It- 




UIHTH RI 


SET COLUMN COUNT 


nni ^^L 

W \ \ \ H 




9i • 

e» • 


Mnu 

nu w 


RFPT RO 


GET CHAR 






PRINTT 




SEND CHAR 








r>F r 


RI 

n 1 t 


DECREMENT COUNT 








DNC 


C 9 


RRANCH IF NOT DONE 








TBI F 
^ n L r 




'SEND CR-LF 


nnnnns 








15 R2 


■SET OVERPRINT COUNT 


001112 








UIDTH RI 


■SET COLUMN COUNT 


nni 11/. 

UU III** 






nUV 


RFPT RO 


■GET CHAR 






PRINTC 




■SEND CHAR 








DEC 


R1 


-DECREMENT COUNT 








writ 


41 


■BRANCH IF NOT DONE 








CR 




;SEND CR 








DEC 


R2 


;DONE OVERPRINTS? 








BNE 


5$ 


;N0. CONTINUE 








LF 




;SEND LF 


001114 






INC 


REPT 


rSET NEXT CHAR 


000177 


001114 




CHP 


#177,REPT 


;OONE CHAR SET? 






BNE 


1$ 


;N0, CONTINUE 


011124 






INC 


PASCNT 


; INCREMENT PASS COUNT 


017555 






HOV 


ipashes.ro 


:SET MESSAGE ADDRESS 


011124 






HOV 


PASCNT, RI 


;* TO CONVERT 


000004 






HOV 


14, R2 


;* DIGITS 






BT0A5C 




.•CONVERT PASS COUNT TO ASCII 








TYPEH 




.•TYPE PASS COUNT 








ENDPAS 












CHAIN 




;REPEAT TEST 








BR 


PT17D 





011124 000000 



PASCNT: 0 
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5195 










.SBTTL ECHO TESTS 




3196 














3197 














3198 














3199 














3200 














3201 














3202 










■xxxxxxxxxx 




3203 














320A 










;E020— CHARACTER ECHO TEST — 


ALL PRINTABLE AND 


3205 










NON-PRINTING CHARACTERS TYPED ON THE KEYBOARD 


3206 










; ARE USED TO DRIVE THE 


PRINTER. ONE CHARACTER AT 


3207 










A TINE. A "RUBOUT" UILL CAUSE THE TEST TO BE 


3208 










TERMINATED. 




T OAA 

3209 














5210 










XXXXXXXXXXX 




Till 

521 1 














5212 


A 1 1 1 1 ^ 

01 1 126 


A AAA "> A 

000020 




E020: 20 


;TEST NUMBER 


3213 


A 4 4 4 T A 

01 1 1 30 


A 4 4 4 7 ^ 

011172 






E021 


;NEXT TEST 


Til/ 

321A 


A 1 1 1 T 1 

01 1 1 32 


4 A / A 4 1 

10401 2 






PRTHDR 


;PRINT TEST HEADER 


T 1 1 C 

521 5 


01 1 15*1 


4 A / A 4 T 

10401 5 




IS: READ 


:G0 WAIT FOR KEYBOARD INPUT 


T 1 i ^ 

3216 


A 1 4 1 T 

01 1 1 56 


A 4 1 T A A 

012700 


AAAA Z^ 

000036 




nov 130., RO 


;DELAY FOR HALF DUPLEX 


T 1 1 T 

521 7 


A 1 1 1 / 1 

01 1 H2 


1 A/ A A Z 

104005 






DELAY 


T 1 1 A 

5218 


A 4 4 1 y i 

01 1 1»»«» 


A 4 Z 7 AA 

015700 


AA 4 4 1/ 

001 124 




ROV TEHPCH.RO 


;GET CHAR 


5219 


A 4 4 4 C A 

01 1 1 50 


All T AA 

022700 


AAA 4 7 7 

0001 77 




CMP #177. RO 


: CHECK IF RUBOUT 


T 1 1A 

5220 


A 4 4 4 C y 

01 1 1 SA 


A A 4 J A 1 

001402 






BEQ 2S 


;BRANCH IF YES 


T H 1 

3221 


A 4 4 % K. d. 

01 1 1 56 


1 A/ All 

104021 






ECHO 


;N0, CHECK PRINTER READY 




mil An 








BR IS 


3223 


011162 


104002 




21: TYPEM 


:PRINT TERMINATION MESSAGE 


3224 


011164 


020017 






ECOEND 




3225 


011166 


104001 






CHAIN 


.•CHAIN TO NEXT TEST 


3226 


011170 


000761 






BR IS 


;REPEAT TEST 
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5227 
3228 
5229 
5250 
5251 
5252 
5255 
5254 
525S 
5256 

5257 011172 000021 

5258 011174 011244 

5259 011176 104012 

5240 011200 012757 000060 001114 

5241 011206 013757 001112 001122 

5242 011214 013700 001114 
3245 011220 104011 

5244 011222 005537 001122 

5245 011226 001572 

5246 011250 104006 

5247 011252 000765 
5248 

5249 011254 104002 

3250 011236 020017 

3251 011240 104001 

3252 011242 000756 
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SEQ 0074 



E021~ LIHE ECHO TEST. FAST RATE— THIS TEST WILL 

CAUSE THE CONTINUAL PRINTING OF "0" AT THE HAXimjn 
RATE UNTIL EITHER ANOTHER CHARACTER IS SELECTED 
BT PRESSING A KEY ON THE KEYBOARD OR TERMINATION BY THE 
RUBOUT . 



XXXXXXXXXX 



E021: 



E021A: 

2S: 

1$: 



21 

E022 
PRTHOR 

nov 
nov 
nov 

PRINTC 

DEC 

BNE 

CRLF 

BR 



«60.REPT 
WIDTH. POSI 
REPT.RO 

POSI 
IS 

2S 



E0216: 



TYPEH 

ECOEND 

CHAIN 

BR E021A 



TEST NUMBER 

NEXT TEST 

PRINT TEST HEADER 

CHARACTER TO BE REPEATED (0) 

SET CHAR COUNT 

CHAR TO TEHPCH 

PRINT CHAR 

DECREMENT POSITION COUNTER 
CONTINUE 

SEND A CR AND LF 



.-PRINT TERMINATION MESG 

.•CHAIN TO NEXT TEST 
.•REPEAT TEST 
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5255 

52S4 

5255 

5256 

5257 

5258 

5259 

5260 

5261 

5262 

5265 

5264 

5265 

5266 

5267 

5268 

5269 

5270 

5271 

5272 

5275 

lilt, 

5275 

5276 

5277 

5278 



Dm11/0j11 
05-AU0-79 



DIAG 
09:18 
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SEO 0075 



;E022— LINE ECHO TEST. SLOy RATE— SAHE AS E021 EXCEPT 
; THAT A DELAY IS INTRODUCED BETWEEN CHARACTERS 

: TO PRODUCE AN LCV ACTION 

•XXXXXXXXXX 



01 1244 


000022 






E022 • 


22 






011246 


011550 








E025 






011250 


104012 








PRTMDR 




PRINT TEST HEADER 


011252 


012757 


000060 


001114 


E022A: 


nov 


#60,REPT 


LOAD 0 AS INITIAL CHARACTER 


011260 


015757 


001112 


001 122 


5i: 


nov 


WIDTH. POSI 


SET CHAR COUNT 


Oil 266 


0 1 5r 00 


AA 111/ 

001 1 1 4 




1 • . 


nOV 


REPT.RO 


READY, CHAR TJ TEMPCH 


011272 


104011 








PRINTC 




OUTPUT CHAR 


011274 


012700 


005410 






BOV 


«5410,R0 




011500 


104005 








DELAY 






011502 


005557 


001122 






DEC 


POSI 


DECREMENT POSITION COUNTER 


011506 


001567 








BNE 


IS 


iBRANCH IF NOT DONE LINE 


011510 


104006 






2t: 


CRLF 




;SEND A CR AND LF 


011512 


000762 








BR 


51 




011514 


104002 






E022B: 


TYPEH 


:PRINT TERMINATION MESSAGE 


011516 


020017 








ECOEND 






011520 


104001 








CHAIN 


:CHAIN TO NEXT TEST 


011522 


000755 








BR 


E022A 


;REPEAT TEST 



CZLADDO LA56 DhII/DjII DUG 
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SEQ 0C76 



5279 














5280 














5281 








: THIS FOLLOWING 


5282 














5285 














528A 














5285 


01 1524 


052516 


020114 


NONIC: .ASCI 


I /NUL 


/ 


5286 


011550 


047525 


020110 


.ASCI 


1 /SOH 


/ 


5287 


011554 


052125 


020150 


.ASCI 


I /SIX 


/ 


5288 


011540 


052105 


020150 


.ASCI 


1 /E 


/ 


5289 


011544 


047505 


020124 


.ASCI 


1 /EOT 


/ 


5290 


011350 


047105 


020121 


.ASCI 


I /ENQ 


/ 


5291 


011354 


041501 


020113 


.ASCI 


1 /ACK 


/ 


5292 


011560 


042502 


020114 


.ASCI 


I /BEL 


/ 


5295 


011564 


051502 


020040 


.ASCI 


I /BS 


/ 


5294 


011570 


052110 


020040 


.ASCI 


I /HT 


/ 


5295 


011574 


043114 


020040 
020040 


.ASCI 


I /LF 


/ 


5296 


011400 


052126 


.ASCI 


I /VT 


/ 


5297 


011404 


043106 


020040 


• ASCI 


I /FF 


/ 


5298 


011410 


051105 


020040 


.ASCI 


I /CR 


/ 


5299 


011414 


047525 


020040 


.ASCI 


I /SO 


/ 


5500 


011420 


044523 


020040 


.ASCI 


I /SI 


/ 


5501 


011424 


046104 


020105 


.ASCI 


1 /OLE 


/ 


5502 


011430 


041504 


020061 


.ASCI 


I /0C1 


/ 


5305 


011434 


041504 


020062 


.ASCI 


I /DC2 


/ 


550A 


011440 


041504 


020063 


.ASCI 


I /DC5 


/ 


5505 


011444 


041504 


020064 


.ASCI 


I /DC4 


/ 


5306 


011450 


040516 


020113 


.ASCI 


I /NAK 


/ 


5507 


011454 


054523 


020116 


.ASCI 


I /SYN 


/ 


3308 


011460 


052105 


020102 


.ASCI 


I /ETB 


/ 


3509 


011464 


040505 


020116 


.ASCI 


I /CAN 


/ 


5510 


011470 


046505 


020040 


.ASCI 


I /EH 


/ 


5511 


011474 


052523 


020102 


.ASCI 


1 /SUB 


/ 


5512 


011500 


051505 


020105 


.ASCI 


I /ESC 


/ 


3315 


011504 


051506 


020040 


.ASCI 


1 /FS 


/ 


33U 


011510 


051507 


020040 


-ASCI 


1 /6S 


/ 


5515 


011514 


051522 


020040 


.ASCI 


I /RS 


/ 


5516 


011520 


051525 


020040 


.ASCI 


I /US 


/ 


5317 


011524 


050123 


020040 


.ASCI 


1 /SP 


/ 


3318 














3319 








.EVEN 







CZLADDO LA56 
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NACYll 50A(1052) 05-AU6-79 
ECHO TESTS 



n 6 

09:23 PAGE 77 



SEO 0077 



5520 












rXXXXXXXXXX 






5521 




















5522 














CHARACTER CODE TEST— ALL CHARACTERS SELECTED 


5525 














WILL BE 


ECHOED ALONG WITH ITS OCTAL CODE. 


5524 














A nNEHONIC WILL BE PRINTED INSTEAD OF THE CHARACTER 


5525 














n IT IS A NON-PRINTING CHARACTER. 


5526 














THE PARITY OF THE RECEIVED CODE WILL BE 


5527 














INDICATED AS EITHER EVEN 


OR ODD. 


5528 




















5529 












xxxxxxxxxx 






5550 




















5551 


01 1530 


000023 

W W W W fc nr 






E023: 


23 




TEST NUMBER 


3552 


011532 


012052 










E024 




NEXT TEST 


5535 


011534 


104012 










PRTHOR 




PRINT TEST HEADER 


5554 


011556 


104013 






It: 


READ 




GO WAIT FOR CHARACTER 


5555 


011540 


012700 


000036 








nov 


#30., RO 


DELAY FOR HALF DUPLEX 


5356 


011544 


104003 










DELAY 






5537 


01 1546 


023727 


001124 


000041 






CHP 


TEHPCH,#41 


TEST IF CHAR IS PRINTABLE 


5338 


011554 


103015 










BHIS 


3$ 


.BRANCH IF IT IS 


3559 


01 1556 


004737 


011712 








JSR 


PC.STRLN 


STORE CODE INTO MESSAGE 


3340 


01 1562 


013700 


001124 








nov 


TENPCH.RO 


,GET CODE AGAIN 


3341 


011566 


006300 










ASL 


RO 


;NULT BY 2 


5342 


011570 


006300 










ASL 


RO 


■HULT BY 4 


3545 


011572 


062700 


011324 








ADD 


«nONIC,RO 


;ADD ADDR OF HNEHONIC TABLE 


5544 


011576 


004737 


011770 








JSR 


PC .BOVNUH 


;nOV HNEHONIC TO MESSAGE 


3345 


011602 


104000 






2»: 


TYPE 




;TYPE CODE AND HKCrtON."" 


5346 


01 1604 


020046 










E023H 




-ADDRESS OF MESSAGE 


3347 


011606 


000753 










BR 


11 


,G0 UAIT FOR NEXT CHARACTER 


3348 


01 1610 


023727 


001124 


000177 


3»: 


CHP 


TEHPCH,*177 


;TEST IF CHAR IS A RUBOUT 


3349 


011616 


001421 










BEQ 


4t 


; BRANCH IF RUBOUT 


3350 


011620 


012701 


012042 








MOV 


«nG24.R1 




3351 


011624 


115721 


001124 








novB 


TEnPCH,(Rl)+ 




3552 


011630 


112721 


000040 








novB 


#40. (RD* 




5555 


01 1634 


112721 


000040 








HOVB 


140. (RD* 




5554 


011640 


1 12721 


000040 








novB 


#40. (RD* 




3355 


01 1644 


004757 


011712 








JSR 


PC.STRLN 


;STORE CODE INTO MESSAGE 


3356 


011650 


012700 


012042 








«ov 


#nG24,R0 


;ADDR OF CHAR INTO RO 


3357 


01 1654 


004757 


011770 








JSR 


PC.NOVNUn 


;MOVE CHAR INTO MESSAGE 


3358 


011660 


0007S0 










BR 


l\ 


:TYPE MESSAGE 


3359 


011662 


004737 


011712 




4S: 


JSR 


PC.STRLN 


; RUBOUT, CONVERT AND STOR CODE 


3360 


011666 


012700 


012046 








nov 


#HG25,R0 


;ADDR. OF DEL INTO RO 


3361 


011672 


004737 


011770 








JSR 


PC.HOVNUH 


;MOVE DEL INTO MESSAGE 


3362 


011676 


104000 










TYPE 




.-TYPE MESSAGE 


3363 


011700 


020046 










E023H 




:ADDR OF MESSAGE 


3564 


011702 


104002 










TYPEH 






3565 


011704 


020017 










ECOEND 






3366 


011706 


104001 










CHAIN 


;CHAIN TO NEXT TEST 


5367 


011710 


000712 










BR 


IS 


;REPEAT TEST 



CZLADDO LA36 DHll/DJll DIAG HACVll 30A(1052) 03 
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ftl 1 7 1 5 


ni 57n3 


nnnooi 

UUUUU J 


^TOt M- 
9 1 n LI • 


nu V 


3>OT 


U 1 1 1 1 O 


ni 5 7n'i 


njnn^n 




nu V 


5 jf U 


ni 1 7?5 


nA?70i 


noooo^ 

UUUUU J 






jji 1 


nil 

U 1 1 1 CO 


ni 1700 


001 1 3o 

Uw 1 1 J\J 


11' 


HOV 




ftl 1 71? 


Oi.?7no 


1 77770 




Ri r 

D i V. 


XX7X 


ni 1 71a 

U 1 1 1 JO 


0*1? 700 


0000^0 

UUUUDU 




Ann 


XX7L 


ni 1 7l7 


1 100L1 






MOUR 

nw¥D 




nil 7LL 


00^102 
UU J JVC 






WL I* 




ni 1 7Lti 


001407 
UU • "»Ui 






RFQ 




01 1 7S0 

1/ 1 1 » Jv 


00^237 


001 1 30 

vV 1 ■ ^V 




ASR 




01 1 7S4 

V 1 1 f J*9 


006237 


001 1 30 

VV 1 1 




ASR 


XX7Q 


01 1 7#»0 

U 1 1 r 0\J 


00*»2^7 

UUDc J 1 


001 1 30 

WW 1 1 JV 




ASR 

n «9 n 




Oil 7t\L 


ooo7fkO 

UvU r DU 






BR 


JjO 1 


01 1 7M\ 


000207 




21' 


RTS 


J jOc 


























01 1 770 


01 2701 


0200S4 

wC W 




nov 


J JO J 


01 1 774 


012702 


000004 

V Wv V^ 




nov 


JJOO 


017000 


1 17071 




IS: 


novB 


^^A7 


017002 


005302 






DEC 


JJOO 


017004 


001 375 

WW \ J f J 






BNE 




01 700^ 


105757 


001 1 26 




TSTB 


JJrv 


01 ?01 ? 


001005 






BNE 




01?014 


012700 


0201 1 1 




NOV 




01 ?0?0 


000402 






BR 


J J 7 J 


012022 


012700 


0201 15 


2%: 


nov 




01 70?ft 


012702 

V 1 C > vc 


000004 

V V V V w~ 


31: 


nov 




012032 


112021 




4$: 


novB 




012034 


005302 

V V ^ ^Vfc 






DEC 




012036 


001575 






BNE 




01 2040 


000207 

V w W I* w f 






RTS 


^399 








MG24: 


.ASCII 




012042 


020040 

V fc W W ~ V 


020040 


3401 










.EVEN 


3A02 










5^.03 








nG23: 




3<.0'i 


012046 


042504 


020114 


.ASCII 


3405 










.EVEN 


3406 











N 6 
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SEO 0078 



#3,R2 .-COUNT OF 3 TO R2 

#L1NE5.R1 ;ADDR OF HES6 TO RI 

13, RI ;POINT TO LAST SPACE IN HESG 

PCHAR.RO ;HOVE OCTAL CODE TO RO 

#177770. RO ;SAVE LS OCTAL CHAR. 

#60, RO .-HAKE ASCII 

R0,-{R1) ;HOVE INTO HESG 

R2 .DECREMENT CHAR COUNTER 

21 .-BRANCH IF 3 f^OVED 

pchar :not three. shift next octal 

pchar ; character to the right 
pchar 

1$ -convert and store next char, 

pc : return to caller 



#L1NE5A,R1 ;ADDR OF LINES IN RI 

#4,R2 .-COUNT OF 3 TO R2 

{R0)*,(R1)* ;HOV 3 CHARS TO HESG AREA 

R2 .-DECREMENT COUNTER 

IS ; BRANCH IF NOT ALL DONE 

PARITY .TEST PARITY FLAG 

2S :BRANCH IF ODD PARITY 

/»EVEN.RO .-SET MESSAGE FOR EVEN PARITY 

3S ; CONTINUE 

#ODD,RO .-SET MESSAGE FOR ODD PARITY 

#4.R2 ;SET WORD COUNT 

(R0)*.{R1)* .-HOVE CHAR TO MESSAGE 

R2 .-DEC CMAR COUNT 

4S .-CONTINUE 

PC ; RETURN 

/ / ;SAVE CHARACTER CODE 



/DEL / ; MNEMONIC FOR RUBOUT 



CZlADDO LA56 DHll/DJil DIAG 
CZLADD.Pn 05-AUG-79 09:18 

5A07 
3^08 
3A09 
3410 
5<.1 1 
3<.12 
3413 
34K 
3415 
3416 
3417 
5418 
3419 
3420 
3421 

3422 012052 000024 

3423 012054 012636 

3424 012056 104012 

3425 012060 005001 

3426 012062 012702 012234 

3427 012066 104013 

3428 012070 012^00 000036 

3429 012074 104003 

5450 012076 022737 000177 

3431 012104 001447 

3432 012106 022757 000005 
5433 012114 001416 

3434 012116 020127 000400 

5435 012122 103361 

3436 012124 013700 001124 

5437 012150 110022 

3458 012152 005201 

5439 012134 104021 

5440 012136 000753 

5441 

5442 012140 005037 001124 

54A3 012144 104006 

54<.A 012146 104010 

5<.<.5 012150 000745 
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xxxxxxxxxx 

E02«.~ Sf^LECTED PATTERN ECHO TEST— SELECT 1 TO 256 
CHARACTERS. EACH WILL BE ECHOED 
AND STORED UNTIL THE CNTL/C IS SELECTED. 
AT THAT TINE ALL CHARACTERS WILL BE PRINTED AS 
A CONTINOUS STRING UNTIL EITHER THE RUBOUT IS 
SELECTED TO TERMINATE OR THE CNTL/C IS SELECTED 
AGAIN. A TERMINATING CNTL/L FOLLOWED BY A CNTL/C WILL ALWAYS 
CAUSE THE LAST INPUTTED STRING TO BE REPEATED. A TERMINATING 
CNTL/C FOLLOWED BY SOME OTHER CHARACTER WILL START A NEW 
STRING. 



SEO 0079 



XXXXXXXXXXX 



E024: 



E024B: 
IS: 



001124 
001124 



E024R: 



24 




E025 




PRTHDR 




CLR 


R1 


MOV 


not IC D D ? 

ffoUr R ,Rc 


READ 




MOV 


#50.. RO 


DELAY 




CMP 


#177,TEHPCH 


BEQ 


TERM 


CMP 


IK3.TEMPCH 


BEQ 


OUTPUT 


CMP 


R1 .#256. 


BHIS 


1$ 


MOV 


TEMPCH,RO 


MOVB 


R0.(R2)* 


INC 


R1 


ECHO 




BR 


IS 


CLR 


TEMPCH 


CRLF 




LF 




BR 


E024B 



TEST NUMBER 

NEXT TEST 

PRINT TEST HEADER 

CLEAR CHARACTER COUNT 

ADDRESS OF BUFFER TO R2 

WAIT FOR INPUT 

DELAY FOR HALF DUPLEX 

TEST IF RUBOUT 
BRANCH IF RUBOUT 
TEST IF .CNTL-C 
BRANCH IF CNTL-C 

YES, CHECK IF CHAR CNT IS EO. GT 256 
BRANCH IF YES. IGNORE CHAR 
GET CHAR 

STORE CHAR INTO BUFFER 
INCREMENT CHARACTER COUNT 
OUTPUT CHAR 
GO WAIT FOR NEXT CHAR 

CLEAR CONTROL-C FROM BUFFER 
CONTROL-C RETURN FROM PRINT ROUTINE 



CZlADDO LA56 
CZLADD.Pll 
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SEQ U080 











































.■SECTION TO OUTPUT CONT INDUS STRING 


5A<,9 
















5^50 
















5451 
















5452 


012152 


020227 


012254 


OUTPUT: 


CHP 


R2,«BUFR 


CHECK IF POINTER IS AT START OF 
YES. DON'T STORE 'C IN TABLE 


5455 


012156 


001405 






BEQ 


1» 


5454 


012160 


115722 


001124 




novB 


TEnPCH,(R2)* 


STORE "C IN TABLE 


5455 


012164 


005037 


001124 




CLR 


TEUPCH 


•CLEAR CONTROL-C FROM BUFFER 


5456 


012170 


104006 






CRLf 




SEND A CR LF 


5457 


012172 


012702 


012254 


IS: 


MOV 


»BUFR,R2 


•BUFFER ADDRESS TO R2 


5458 


012176 


005057 


001124 




CLR 


TEHPCH 


CLEAR CONTROL-C 


5459 


012202 


121227 


000003 




CHPB 


(R2).#5 


;FIRST CHAR IN TABLE *C ? 


5460 


012206 


001724 






BEQ 


E024B 


;YES, GO LOOK FOR MORE INPUT 


5461 


012210 


112200 




2S: 


novB 


(R2>«.R0 


;GET CHAR 


5462 


012212 


020027 


000003 




CWP 


R0.f3 


DONE STRING? 


5465 


012216 


001765 






BEQ 


It 


;YES. RESTART STRING 


5464 


012220 


104011 






PRINTC 




: OUTPUT CHAR 


5465 


012222 


000772 






BR 


2$ 




5466 
















5467 


012224 


104002 




TERM: 


TYPEH 


.■OUTPUT TERMINATION MESSAGE 


5468 


012226 


020017 






ECOEND 






5469 


012230 


104001 






CHAIN 


;CHA1N TO NEXT TEST 


5470 


012252 


000712 






BR 


EG24B .-REPEAT TEST 


5471 
















54 72 


012254 


000003 




BUFR: 


5 




INITIALIZE FIRST CHAR AS CNTL-C 
;256 CHARACTER BUFFER 


5475 


012256 


000400 






.BLKB 


256. 



J 



CZLADDO I.A56 
CZLAOD.PIl 
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34 76 








5'.77 








5<«78 








5''.79 








3480 








3481 








3482 








3483 








3484 








3485 


012656 


000025 




3486 


012640 


011126 




3487 


012642 


104012 


001112 


3488 


012644 


023727 


3489 


012652 


103424 




5490 


012654 


104002 




3491 


012656 


017672 




5492 


012660 


000402 




3493 


012662 


104000 




3494 


012664 


017672 




3495 


012666 


104013 




3496 


012670 


012700 


000036 


3497 


012674 


104003 




3498 


012676 


113700 


001124 


3499 


012702 


020027 


000040 


3500 


012706 


103767 




3501 


012710 


022700 


000177 


3502 


012714 


001405 




3503 


012716 


104021 




5504 


012720 


104007 




3505 


012722 


000757 




3506 


012724 


104002 




3507 


012726 


017772 




3508 


012750 


104002 




3509 


012732 


020017 




3510 


012734 


104001 




5511 


012756 


000742 





HACTll 50A(1052) 05-AUG-79 
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XXXXXXXXXXX 



D 7 
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SEQ 0081 



E025— BELL ECHO TEST— A MESSAGE IS PRINTED AND 

THE TEST WAITS FOR SO«E PRINTABLE CHARACTER 
TO BE SELECTED ON ^HE KEYBOARD t6T040). THIS 
TEST IS VALID ONLY If THE PAPER WIDTH IS 6T 64 
COLUMNS. IF LT64 COLU'^NS AN ILLEGAL BELL TEST 
MESSAGE IS PRINTED. 



xxxxxxxxxxx 



E025: 


25 

E020 
PRTHDR 




IS: 


CHP 


WIDTH, #101 




BLO 


4S 




TYPEH 






E025HA 






BR 


5» 


2t: 


TYPE 
E025f1A 




51: 


READ 






nOV 






DELAY 






novB 


TEHPCH.RO 




CHP 


R0,ir40 




BLO 


5t 




CHP 


#177, RO 




BEQ 


5$ 




ECHO 






SCRLF 






BR 


2S 


4S: 


TYPEH 
E025nB 




5t: 


TYPEH 

ECOEND 

CHAIN 






BR 


It 



TEST NUHBER 

NEXT TEST HEADER 

PRINT TEST HEADER 

TEST IF COLUMN COUNTIS EQ,GT 64 

BRANCH IF NOT 

TYPE TEST HESG 

ON ALL TERM'S 

WAIT FOR CHAR 

TYPE TEST MESG ON TERM 

CHARACTER yAS RECEIVED ON 

WAIT FOR OPERATOR RESPONSE 

DELAY FOR HALF DUPLEX 

CHAR TO RO 

TEST IF PRINTABLE 

BRANCH IF NON-PRINTABLE 

CHECK IF CHAR IS RUBOUT 

BRANCH IF YES 

PRINT CHAR 

SEND A CRLF 

REPEAT 

TYPE ERROR MESSAGE 

.-PRINT TERMINATION 

;EXIT TO NEXT TEST 
.•REPEAT TEST 



r.ZLADOO LA56 
CZLADO.Pn 
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NACYll 
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OPTION TFSTS 



E 1 
PAGE 



91 



SEQ 0082 



5S12 








3515 








55K 








3515 








5516 








3517 








5518 








5519 








5520 


012740 


A A M A 4 4% 

000050 




5521 


012742 


012740 




5522 


012744 


104012 




5525 


012746 


012704 


A A A A 4 A 

000010 


5524 


012752 


104002 


01 5056 


5525 


012756 


A 4 ^ ^ A t 

012702 


A A A 4 7 7 

0001 77 


5526 


012762 


A A / 7 9 7 

004757 


A 4 9 A C A 

01 3050 


5527 


012766 


4 A J A A ^ 

104002 


A 1 9 A y T 

015043 


5528 


012772 


A 4 9 7 A ^ 

01 5702 


A 4 9 1 t A 

01 51 20 


5529 


012776 


A ^ A ^ ^ 7 

020227 


A A A 9 7 7 

000577 


5550 


01 5002 


A A 4 i A 9 

001405 




5551 


A 4 9 A A i 

01 5004 


A 4 ^ 7 A A 

012700 


AAAA4 d, 

000016 


5552 


01 5010 


104011 




T r T Y 

5555 


A 4 9 A 4 ^ 

01 5012 


A A y 7 9 7 

004737 


A 1 VACA 

01 3050 


555A 


A 4 9 A 4 A. 

015016 


4 A i A AZ 

104006 




V r T c 

5555 


A 4 9 A ^ A 

01 5020 


A A i: 9 A y 

005304 




5556 


A 4 9 A ^ ^ 

01 5022 


A A 4 T C 7 

001 553 

A 4 ^ ^AA 

012700 




5557 


015024 


A A A A 4 7 

00001 7 


5558 


A 4 9 A 9 A 

015050 


4 A / A 4 4 

10401 1 




5559 


Qi 3052 


1 A/ AA 1 

104001 




55AO 


Oi 303*» 


AAA 7/ 1 

000 7h1 












5542 


A 4 V A 9 ^ 

015036 


A 1 y 1 7 

02141 7 


036461 


5545 


A 4 T Ay T 

01 3043 


A 1 7 

01 7 


A T 1 Ay T 

031043 


5544 








5545 








5546 


A 4 T A C A 

01 3050 


A 1 A T A 1 

010201 




5547 


A 1 Y AC ^ 

01 3052 


Ay 1 7A 1 


1 f (Jit 


5548 


A 1 T AC ^ 

01 3056 


013703 


AA1 11^ 

001 1 12 


5549 


A 4 T A^ *) 

013062 


1 i ^ 'TA 2 

1 62703 


AAAAAZ 
000003 


5550 


A 4 T AX. ^ 

01 3066 


A 1 A 1 AA 
0101 00 




9 C C 1 

5551 


A 1 T A TA 

013070 


1 Ai A 1 1 

10401 1 




5552 


A 1 T A 7 T 

01 3072 


AA C 0 A 1 

005^01 




V e c T 

5555 


A 4 9 A 7 / 

01 5074 


A ^ A 1 A 1 

020102 




5554 


A 1 T A 7 A 

013076 


A A 4 y Aa 

001406 




9 f C C 

5555 


A 1 V 4 AA 

01 5100 


A AC T A 1 

005305 




5556 


A 1 T 1 A ^ 

015102 


AA 1 T 7 1 

001 371 




V C C 7 

5557 


A 1 T 1 A/ 

01 5104 


104006 




T C C O 

5558 


A 1 V 1 A^ 

01 3106 


Alt 7A I 

01 blVj 


001 1 1 c 


3559 


A 1 V 1 1 

01 31 1 t 


AAA7^C 

000' 65 






ni ti iA 






5561 


015116 


000207 




5562 








5565 


015120 


000177 




3564 









.sbttl option tests 



;XXXXXXXXXXXXXXX 

;TEST30 - SECONDARY CHARACTER SET OPTION 

;XXXXXXXXXXXXXXX 



TEST50: 



2$: 



5$: 



000 
000075 



10S: 
201: 



50$: 



311: 



52$: 

T50SC; 



50 

TEST50 

PRTHDR 

HOV 

TtPEH. 

MOV 

JSR 

TfPEH. 

nov 
CUP 

BEQ 
NOV 

PRINTC 

JSR 

CRLF 

DEC 

BNE 

nov 

PRINTC 

CHAIN 

BR 

.ASCIZ 
.ASCI2 
.EVEN 

NOV 
BIC 

nov 

SUB 

MOV 

PRINTC 

INC 

CMP 

BEQ 

DEC 

BNE 

CRLF 

MOV 

BR 

CRLF 

RTS 

.WORD 



*8.,R4 
10$ 

#177. R2 
PC. 50$ 
20$ 

T50SC.R2 

R2.*577 

5$ 

#16, RO 

PC, 50$ 

R4 
2$ 

#17. RO 



TEST50 

<17>/#1=/ 
<17>/#2=/ 



R2,R1 

#177557. R1 
WIDTH. R5 
#5.R5 
R1 .RO 

R1 

Rl .R2 
52$ 
R3 
31$ 

U1DTH.R5 
51$ 

PC 

177 



PRINT TEST HEADER 
SET PASS COUNT 

INDICATE PRIMARY SET AND SEND 

SET END CHAR 

PRINT CHAR SET 

INDICATE SECONDARY CHAR SET 

;SET CHAR SET LIMIT 
USING 8 BITS INSTEAD OF SI? 
BRANCH IF YES 
SET SO CHAR 
SEND IT 

PRINT CHAR SET 

BLANK LINE 

DEC PASS COUNT 

FINISH TEST 

SET SI CHAR AGAIN 

MAKE SURE ON PRIMARY CHAR SET 

NEXT TEST SELECTION OR LOOP 

LOOP ON TEST 



•sr 



GET LIMJT CHAR 
GET START CHAR 
GET COLUMN COUNT 
SUBTRACT 5 
GET CHAR 
PRINT IT 
NEXT CHAR 
DONE CHAR SET? 
EXIT IF DONE 
DEC COLUMN COUNT 
FINISH LINE 

SEND CR-LF WHEN DONE LINE 

RESET COLUMN COUNT 

CONTINUE 

SEND CR-LF 

RETURN 

.CHAR SET LIMIT 

.-CHANGE TO 577 WHEN USING 8 BIT CHAR SELECTION 
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SEQ 0085 



5565 








rXXXXXXXXXXXXXXX 




5566 
















5567 








•TEST31 




SELECTIVE ADDRESSING OPTION 


5568 
















5569 








zXXXXXXXXXXXXXXX 




5570 
















5571 


015122 


A A A A 9 4 

000031 




« r « 9 4 

TEST31 : 


9 4 

51 






5572 


015124 


015122 






TEST51 






5575 


015126 


104006 






CRLF 




SEND CRLF 


5574 


015150 


015700 


013712 




MOV 


T M ^ AA 

54».R0 


SET EOT CHAR 


5575 


015154 


10401 1 






PRINTC 




SEND IT 


5576 


01 5156 


104002 


A 4 M K. t ^ 

01 3542 




T YPEn, 


1 A# 

10> 


TRY PRINTING ERROR MESG 


5577 


01 5142 


012700 


A A A A A ^ 

000007 




MA V 1 

nOV 


<l 7 A A 

17, RO 


SET BEL CHAR 


5578 


01 5146 


4 A y A 4 4 

10401 1 






PRINTC 




SEND IT 


5579 


01 5150 


012700 


AA A AA T 

000002 




nov 


f2,R0 


SET STX CHAR 


V c a A 

5580 


015154 


4 A / A 4 4 

10401 1 






PRINTC 




SEND IT 


5581 


0151 56 


4 A / A 4 n 

104012 






PRTHDR 




PRINT TEST HEADER ON ALL TERMINALS 


5582 


015160 


A 4 9 ^ A A 

015700 


A 4 9^4 ^ 

015712 




Mnii 

nijv 


Z/ C DA 


CCT CAT ^AAC 

SET EOT CODE 


V c a V 

5585 


015164 


4 A « A 4 4 

104011 






PRIN 1 C 




C C Uff\ 1 T 

SEND IT 


558A 


015166 


A 4 ^ ^ A A 

012700 


A A AAA ^ 

000002 






M ? Dn 


Scl STX CODc 


5585 


A 4 9 4 ^ ^ 

015172 


4 A / A 4 4 

10401 1 






DDI uT r 




SEND IT 


3586 


A 4 9 4 7 f 

01 51 74 


4 A / A A ^ 

104002 


A 4 7 C / T 

015542 




T VDC M 


1 nc 


TRY PRINT ERROR ntSu 


T r a 7 

5587 


015200 


A 4 ^ 7A T 

01 2703 


A 1 7 ^ 7 A 

01 3670 




nov 


MX A* nz 


it 1 IAdLc rUlNltK 


v <r a A 

5588 


A 4 9 ^ A / 

01 5204 


A A C 7 4 T 

00571 5 




1 c • 


T CT 


(R5) 


r uZ r If TADI C DniAlTCD 

CHtLR TAoLt POlNitK 


V f a n 

5589 


A 4 9 A Z 

01 5206 


AA 4 / 4 ^ 

00 1 4 1 6 






Qcn 


2t 


NEXT PORTION Or TEST If DONt 


5590 


A 4 T ^ 4 A 

015210 


A 4 T TAA 

01 5700 


A 1 T 7 1 T 

01 3712 




nuv 


54$, RO 


-SEND EOT CHAR 


5591 


A 4 9^4 / 

015214 
0'3216 


4 A / A 1 4 

10401 1 






DD 1 &JT r 






5592 


A 4 4 9 A A 

01 1 500 






nuv 


(R5},R0 


;SEND GROUP SELECT CHAR 


5595 


013220 


1 A> All 

IOhOI 1 






DD I klT r 
rn 1 N 1 L 




;SEND IT 


V c n y 

559^1 


A 4 9 1 ^ ^ 

01 5222 


AIT 7AA 

01 2700 


A A AAA T 

000002 




nuv 


#2,R0 


•SEND STX CHAR 


5595 


A 4 T 

01 5226 


1 A/ A 1 1 

1 0401 1 






PD I kiT r 






5596 


A 4 9 ^ TA 

01 5250 


4 A / AA ^ 

1 04002 


A 4 7 ^ A^ 

013606 






14$ 


;TYPE MESG 


5597 


A 4 9 ^ T / 

01 5254 


AIT T A A 

012300 






nuv 


(R3)+.R0 ;TYPE SELECT CHAR FOR MES6 


5598 


01 5256 


1 0401 1 






DD I iiT r 






3599 


A 4 9 / A 

015240 


4 A / A A 1. 

104006 






r Di F 




; CR-LF 


5600 


013242 


AAA 7a. A 
000^60 






RD 


1$ 


; CONTINUE - NEXT SELECT CHAR 


5601 


A 4 V i i 

015244 


AIT 7A V 

012703 


A 4 7 7 1 ^ 

015716 


7C • 
C9 . 


Mnu 

nuv 


«40$,R5 


;SET TABLE ADR 


3602 


A 4 V ^ C A 

01 5250 


A A r 7 4 T 

00571 5 






T C T 


(R5) 


; CHECK SELECT CHAR 


5605 


A 4 9 f 

01 5252 


AA 4 C 4 7 

001 51 7 






DCU 


4$ 


; CONTINUE TEST 


5604 


A 4 T ^ C y 

015254 


A 4 9 TAA 

01 5700 


A 4 7 7 i T 

01 3712 




nuv 


54$, RO 


:SEND EOT CHAR 


3605 


A 4 9 ^ A 

01 5260 


4 A / A 4 1 

1 0401 1 






PR 1 iiT r 




;ALL TERMS OFF 


3606 


A 4 9 ^ ^ 

01 5262 


A 4 4 9 A A 

01 1 500 






nuv 


(R5),R0 


;GET UNIQUE SELECT CHAR 


3607 


015264 


10401 1 






DD I MT f 
rK 1 N 1 L 




:SEND IT - THAT TERM ON 


3608 


A 4 9 ^ ^ A 

015266 


4 A / A A T 

104002 


A 1 7 C y T 

01 3542 




T VPPM 

1 1 r cn , 


10$ 


:TRY PRINTNG ERROR MESG 


3609 


013272 


A 4 T 7 AA 

012^00 


000002 




Mnu 

nuv 


»2,R0 


:SEND STX 


3610 


A 4 9 ^ 

01 5276 


4 A < A 4 4 

10401 1 






PD 1 MT r 




.•TYPE SELECT CHAR MESG 


561 1 


01 5500 


104002 


013614 




TVPEH, 


15$ 


5612 


015504 


01 15O0 






nov 


(R5),R0 


;PR1NT SELECT CHAR FOR MESG 


361 3 


A 4 T T A^ 

013306 


1 A/ A 1 1 

10401 1 






PRINTC 






9 4 4 J 

56 U 


A 4 V 9 4 A 

015510 


4 A / A A ^ 

104006 






CRLF 


20$ 


.-PRINT MESG 


561 5 


A 4 9 9 4 

015512 


4 A / A A T 

104002 


01 3633 




TYPEH. 


iO 1 0 


U 1 J J 1 O 






READ 


;READ CHAR FROM SELECTED TERM 


3617 


013320 


012700 


000036 




NOV 


150., RO 


;OELAY FOR HALF DUPLEX 


5618 


013524 


104005 






DELAY 


#T77,TENPCH 


; CHECK CHAR 


5619 


015526 


02275' 


000177 001124 




CHP 


3620 


013334 


001013 






BNE 


5$ 


:EXIT IF RUBOUT 



CZLADDO LA56 
CZLADD.Pn 



5621 

5622 

5625 

5624 

5625 

5626 

3627 

5628 

5629 

563CJ 

5651 

5632 

5655 

563^. 

3635 

5636 

5657 

5658 

5639 

5640 

56A1 

5642 

5645 

5644 

5645 

5646 

5647 

5648 

5649 

5650 

5651 

5652 

5655 

3654 

5655 

5656 

5657 

5658 

5659 

5660 

5661 

5662 

5663 

3664 

3665 

5666 



015556 
015542 
015544 
015550 
015552 
015556 
01 3360 
013364 
013570 
015572 
015574 
015400 
015402 
013406 
013410 
013414 
013416 
013422 
013426 
013430 
013452 
013434 
015440 
013442 
013446 
013450 
013452 
013454 
013460 
013462 
015466 
015470 
015474 
015476 
013502 
015504 
013506 
015510 
013512 
013516 
013520 
013524 
013526 
013532 
013534 
013556 



DhII/DjII 
05-AU&-79 

015700 
10401 I 
012700 
104011 
012700 
104011 
000137 
013700 
104021 
104006 
013700 
104011 
013700 
104011 
012700 
104011 
104002 
012700 
104011 
011300 
104011 
012700 
104011 
104002 
011300 
104011 
104006 
012700 
104011 
012700 
104011 
012700 
104011 
104002 
012300 
10*.011 
104006 
000657 
013700 
104011 
012700 
104011 
012700 
104011 
104001 
000137 
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OPTION TESTS 






015712 


nov 


541, RO 


;ENABLE ALL TERMINALS 




PRINTC 






000007 


«0V 


i7.R0 






PRINTC 






000002 


nov 


#2,R0 






PRINTC 






002540 


JMP 


TTYlH 


;G0 TO tCYBO CONTROL 


001124 


5t: nov 


TEnPCH.RO 


;6ET CHAR 




ECHO 




;ECH0 CHAR 




CRLF 




.•SEND CR-LF 


013712 


MOV 


54S.R0 


.'SEND EOT CHAR 




PRINTC 






015714 


HOV 


35»,R0 


;SEND DUnnY SELECT CHAR 




PRINTC 






000002 


nov 


#2,R0 


;SEND STX 




PRINTC 






013542 


TYPEn, 


10$ 


;TRY PRINTING ERROR MESSAGE 


000003 


nov 


«3,R0 


.-SEND ETX 




PRINTC 








nov 


IR3) ,R0 


;SEND UNIQUE ScLcCi CHAR 




PRINTC 






000002 


nov 


#2,R0 


;SENO STX 




PRINTC 






013614 


T YPEn. 


1 5$ 


;PRINT SELECT MESG ON SELtClED 


nov 


(R3} ,R0 


;PR1NT SELECT CHAR FOR MESG 




PRINTC 








CRLF 




;SEND CR-LF 


000003 


nov 


*3.R0 


;SEND ETX 




PRINTC 






015714 


nov 


l'35S,R0 


;ScND DUMMY ScLcCT CHAR 


PRINTC 






000002 


nov 


12, RO 


;SENO STX 




PRINTC 






013614 


TYPEn, 


15* 


;PR1NT RESb ON StLtCicD IcRn 


nov 


(R3)^,R0 


;PRINT SELECT CHAR FOR MESG 




PRINTC 








CRLF 




;SEND CR-LF 




BR 


5t 


: CONTINUE 


015712 


41: nov 


54» ,R0 


• CtlAQi C Al 1 1 luce 

;tNADLC ALL LJNC3 


PRINTC 




.ortADC c 1 T 1 ur tcct 

:BcrURc EXlilNo Ttal 


000007 


nov 








PRINTC 






000002 


nov 


#2,R0 






rK IN 1 L 








CHAIN 




; CHAIN TO NEXT TEST OR LOOP ON 


015122 


jnp 


TEST51 


.-LOOP ON TEST 



S£0 0084 
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SFO 0085 



566 f 


01 5!)'»c 


AC 1 1 AC 


A/ 7Q 0 0 

0«ir 3£C 


0^61 CC 


1 AC • 

1 01 : 


A c r 1 
. ASC I 


3o6B 


A 1 Z C C A 

01 5330 


0*»0«f*»U 


Ay 1 1 / 
OhOI I H 


AC T A/. A 

03<:0'tO 






566V 


A1 ZCCik 

01 3336 


AC 1 1 At 

031 103 


Ay / t 1 c 

0'»«»3 1 3 


Ay. AC 1 L 

0*«U3 1 0 






56^0 


01 536»» 


AC1 CI / 

03131»« 


AC 1 y y A 
03 1 *»*»0 


A/ 7Q 1 A 

Uh f 3 1 0 






56 f 1 




0h61 c3 


A DAI A/. 
OcU 1 Oh 


A/. 5QAD 

0*»c30c 






bofc 


A 1 Z£. AA 

01 5600 


A/ T I 1 (\ 
\JH I HHO 


Ay Z1 A/. 

0*»3 1 00 


AAA5AA 

OUOtOO 






56 ^ 3 


A1 T/^Ax, 

01 3606 


AC 1 1 A7 

031 10/ 


A^ 5^ 1 7 

03c3 1 ' 


A5A1 5A 

Ocu 1 cU 




4cr I 
. A»L 1 


DO ft 


A 1 Zik 1 / 

01 561 «» 


m 0 Q D z 
0*» ^ 3 c 3 


Ay 1 y 


n^51 AZ 


1 SI • 


»cr 1 
. 1 


36f 3 


01 56£^ 


Ai 1 / / A 

U«t 1 '••lU 


A/.AM A 


A3A1 D5 






36/6 


01 3630 


UtUOf 3 


AAA 

uuo 








1/^77 

iOI 1 


t\ 1 z z 
U 1 30 3 3 


1 5/. 


A^m Z1 


UcU 1 U J 


>AC • 
cU« • 


• AaL 1 


Z/. /B 

36/^0 


0 1 30hU 


Aa 7 1 AI 


A5A1 Z1 


U J 1 1 cU 






30f 7 


A1 ZA/.A 
0 1 30hO 


rt^ 7 1 1 1 
fill 


AZ.nS?L 
U*»U JtH 


vmD I Ul 






300U 




Ucu 1 U J 




U J 1 1 u 1 






30O 1 






A77AS«i 


UUUUHU 






TAR? 












• even 


30O3 














300h 


U 1 jO 1 U 


nnni n? 








1 07 

\ U 1 


3003 


Ai Z#.7P 


AAAAAA 








0 
u 


3000 


U 1 jO I M 


nnnnnn 








0 
u 


TAB? 
300 f 


U 1 jO I 0 


AAAAAA 
UUUwUv 








A 

u 




AI Z7nn 


nnnnnn 








0 

v 


3007 


{\^ z7nD 


AAAAnn 








0 


j07U 




AAAnnn 








0 

v 


307 1 


U 1 UO 


uuuuuu 








0 


Xt^QO 
JD7C 


AI Z7I A 


nnnnnn 








Q 

w 














004 


jOT't 


V 1 J 1 I £ 


OOOOOA 

Uvwwv*t 






















jOtO 


01 ^71L 
U 1 J 1 1 •» 


UUww't ' 






J J 9 * 


045 


joy f 














j070 














j077 


























125 


X7ni 


ni X71 ^ 








■f v • • 




ni ^7?n 


nnonno 








0 


J f U J 


ni ^7?p 


ftnnnon 

UUUUUU 








0 




AI Z7PA 


nnnnnn 

UUUUUU 








0 


5705 


013726 


000000 

V V W V V V 








0 


3706 


013750 


000000 








0 


5707 


015752 


000000 








0 


5708 


01575<. 


000000 








0 


3709 


013736 


000000 








0 



.ASCIZ /ERROR. ALL TERMINALS SHOULD BE OFF/<ACRlF> 



ASCIZ /TYPE ANT PRINTABLE CHAR ... / 



.•GROUP SELECT CHAR TABLE 
.•FIRST ZERO - END OF TABLE 



.•DESELECT CHAR = "EOT" 
DUHHY SELECT CHARACTER. 

IF "X" IS USED AS A UNIQUE OR GROUP SELECT 
CHARACTER, REPLACE WITH ANY UNUSED SELECT 
CHARACTER CODE. 

iUNIQUE SELECT CHAR TABLE 
; FIRST ZERO = END OF TABLE 
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3710 








371 1 








5712 








3713 








57K 








5715 








5716 


01 5740 


AAA A 7 ^ 

000052 




3717 


0137A2 


01 5740 




5718 


0157A4 


4 A y A 4 ^ 

104012 




3719 


015746 


A 4 ^ 7 AA 

012700 


AAA A AC 

000005 


5720 


015752 


4 A y A 4 

104021 




3721 


A 4 V 7 C y 

01 5754 


A A y 7 7 7 

004757 


A 1 y A A / 

014004 


5722 


A < 7 7 ^ A 

01 5760 


4 A / A A 

104002 


A < y A 7 ^ 

014072 


5723 


A < V 7 ^ / 

01 5764 


AA/ 7 T T 

004757 


A 1 / A A / 

014004 




A 1 7 7 7A 

01 5770 


1 Ay AA 


014117 


3725 


A 1 T 7 7 y 

01 5774 


A A/ 7 T 7 

004757 


A 1 / AAy 

014004 


3726 


A 1 > AAA 

014000 


i A/ AA 1 




5727 


A 4 y A A ^ 

014002 


A A A 7 C ^ 

000756 




3728 






A 1 y 1 y X 
014145 


3729 


A 4 / A A / 

014004 


A < ^ 7A ^ 

012702 


5730 


A 1 / A 1 A 

014010 


1 Ay A 1 7 

1 0401 5 




3731 


A 1 / A 1 T 

01401 2 


A 0 7 7 0 7 


AA 1 1 Oy 

001 1 c4 


3732 


A 1 y A ^ A 

014020 


AA 1 AA T 

001002 




3755 


014022 


AAA 1X7 

0001 5 f 


AAOCy A 

00<:340 


T 7 1 i 

5734 


A 1 t A^i 

014026 


4 1 7 7 0 0 

1 1 5722 


AA1 1 0/ 

001 1 ^4 


1 7 T C 

3735 


A 1 / A T 

014052 


A 1 07A7 

01^/05 


AAAAA. 0 

00006c 


T 7 VA. 

5736 


A 4 i A 7 i. 

014056 


All 7A1 

0 1 3f 01 


A A 1 1 A 0 

001 10c 


V 7 T 7 

3737 


A 1 / A/ O 

014042 


1 Ay A0 1 

104022 




5758 


014044 


AAAy A1 

000401 




5759 


A 1 / A/ iL 

014046 


AAA 7ik 1 

OOOrol 




T 7y A 

37A0 


A 1 y AC A 

014050 


AAC TA 1 

005501 




T "7 / 1 

57A1 


A 1 / AC 

01405^ 


A'^ 1 Z7X 

Ou 1 3 r 5 




57»»2 


A 1 / AC/ 

01 40d4 


AAC I A X 

U05303 




7 7 / T 

5f 


A 1 / AC ^ 

0140?6 


AA 1 li 7 

001 30 f 




7 7/ / 
5' *»H 


A 1 / Ai A 

014060 


mem 0 
10501 c 




Z 7/ C 

57^5 


At/ AA 0 

014062 


1 Ay AAA 
104000 


A1 y 1 /. 0 


7 7i ^ 


0 1 4066 


104U0r 




5747 


A 1 y A 7A 
014070 


AAA0A7 

OOOcOr 




7 7/ O 

57*»8 








7 7 / O 

5f «»9 


A 1 y A7'5 
0140f C 


A/ OCAy 

04c)04 


AC 1 1 OA 

031 I <:0 


T 7 c n 

5750 


A 1 / 1 AA 

014100 


A OA 1 ox 

OcOl £ 3 


A/ 0 C 1 A 

04c310 


7 7 C 1 

5751 


A 1 / i A^ 

01 41 06 


Ay y y y A 

044440 


A OA 1 OX 

OcOi c3 


7 7C 0 

5752 


A 1 y 1 1 y 
0141 14 


1 AA 1X1 

1 00 1 31 


AAA 

ouu 


7 7C T 

5755 


A 1 / 117 
014 1 U 


1 A/ 

1 04 


A^ A1 A^ 


7 7C/ 

575h 


A 1 y 1 Oy 
0141^4 


AC 1 C OX 

051 3*3 


Ay 1 y y.A 

04 1 •I'lU 


7 7C C 

5755 


A 1 y ISO 
01413c 


AC 1 1 Oy 
031 lc4 


A/.ik1 1 7 


7 7CA. 

5r 56 


A 1 / 1 y 
014140 


AAA OAA 

OOOcOO 








C WW 




3758 








5759 


014145 


000025 




5760 








5761 









000177 



051505 
042522 
042513 

042522 
047117 
042455 



:xxxxxxxxxxxxxxx 

:TEST52 - AUTO ANSWER BACK OPTION 

•XXXXXXXXXXXXXXX 



TEST32: 



2J: 

lOt: 
8t: 

5S: 

4S: 
5$: 

6S: 
7J: 



20S: 



52 

TEST32 

PRTHDR 

MOV 

ECHO 

JSR 

TYPEW. 
JSR 

TYPEW. 
JSR 
CHAIN 
BR 

«0V 

READ 

CWP 

BNE 

JHP 

novB 

nov 

nov 

INRDY 

BR 

BR 

DEC 

BNE 

DEC 

BNE 

CLRB 

TYPE, 

SCRLF 

RTS 



#5.R0 

PC. 101 
201 

PC, lot 
50S 

PCIOS 

TEST52 

«ST0RE,R2 

TEHPCH,f177 
51 

TTYlH 

TEHPCH.(R2)* 

l'50..R5 

T1HER.R1 

6$ 
8S 

R1 
51 

R5 
4S 

CR2) 
STORE-1 

PC 



:PRIMT TEST HEADER 
.SEND ENQ CHAR 

READ AND PRINT HESO 
TYPE INSTRUCTIONS 
READ AND PRINT KESG 
TYPE INSTRUCTIONS 
READ AND PRINT HESG 
CHAIN TO NEXT TEST 
LOOP ON TEST 



SET TABLE ADR 

READ FIRST CHAR 

CHAR = RUBOUT? 

CONTINUE IF NOT RUBOUT 

60 TO KVBD CONTROL 

STORE CHAR 

SET DELAY COUNT 

;ANY INPUT? 

:N0. WAIT FOR CHAR 

;YES. READ CHAR 

:DELAY WHILE WAITING FOR CHAR 



SET NULL AS TERMINATOR IN TABLE 
TYPE «ESG ON TERMINAL RECEIVED ON 
SEND CR-LF 
RETURN TO TEST 



.ASCIZ /DEPRESS HERE IS ICEY/<ACRLF> 



501: .ASCIZ /DEPRESS C0NTR0L-E/<ACRLF > 



.ASCII <ACRlF> 
STORE: .BLtCB 21. 
.EVEN 



;20 CHAR ♦ TERMINATOR BUFFER 



CZLADDO LA36 Oh11/Dj11 OIAG 
CZlADO.PII 05-AUG-79 09:18 



5762 

3765 

17 bt, 

576S 

5766 

3767 

3768 

3769 

5770 

5771 

3772 

5775 

5774 

5775 

5776 

5777 

5778 

5779 

5780 

5781 

5782 

5785 

5784 

5785 

5786 

5787 

5788 

5789 

5790 

5791 

5792 

5795 

5794 

5795 

3796 

5797 

5798 

5799 

5800 

5801 

5802 

5803 

3804 

3805 

5806 

5807 

5808 

5809 

3810 

5811 

3812 

5815 

58U 

5815 

5816 

5817 



NACfll 



50AC1052) 05- 
OPTIOH TESTS 



AUG-79 09:23 



J 7 
PAGE 



87 



S60 0087 



XXXXXXXXXXXXXXX 

TEST55 - F0R« FEED OPTION 

XXXXXXXXXXXXXXX 



014170 


000033 






TEST33: 


33 






0141 72 


014170 








TEST33 






014174 


104012 








PRTHDR 




;rRlPiT IcST MtADcR 


0141 76 


012705 


014642 






HOV 


mCAA dC 


;StI TABLt POlNltK 


014202 


012704 


A 4 / A. ^A 

014626 






HOV 


M 1. Aft b / 

i60»,K4 


• CCT T 4DI C DAIAlTCO 

;5tT lAoLc rOlNlcK 


014206 


104002 


A 4 / i C 4 

014451 






T YPtn, 


y AC 
409 


• DDIkIT lUCTD 

; rK 1 N 1 iNo 1 K 


014212 


A 4 O 7 A 1 

012701 


AAAA OA 

000020 






MAti 


« 1 iL D 1 

ff 10. ,KI 


• CCT 1 E fAllklT TA 

; OC 1 Lr LUUNI lU ID 


014216 


4 A / A 4 T 

10401 5 








HcAD 




• UAIT CAD WBn (I kCm 


014220 


A 4 ^ TAA 

012700 


AAAA TA. 

000036 






M At J 


M t A BA 

f 30. .HO 


• f\Cl Aw CAD UAl t nilDI cy 


014224 


4 A/ AAT 








DcLAT 




• ruErr cad diibaiiT 

,LnCLK r UK nUOUU 1 


014226 


022737 


AAA 17 7 

000 177 


AA1 1 ^y 

001 124 




Cnr 


m 77 TCMDr u 


014234 


A A 4 AA O 

001002 








Que 


1 3» 


• CVIT IC DllBAliT 
i C A 1 1 1 r KUDUU 1 


014256 


AAA 1 T 7 

0001 57 


AA 0 C / A 

002540 






Jnr 


T T V 1 U 


• r.t\ TO won rnkiTDAi 

; UU lU KTOU LUrainUL 


014242 


1 A/ A 1 y 






1 3» : 








014244 


4 A / A 4 A 






oc . 
B* : 


1 r 




• QC UFi 1 C 


014246 


A AC T A 1 

005501 








Dev. 


D 1 

K 1 


, UC L LUUn 1 


014250 


AA 1 T 7 C 

001 575 








oNc 




• TAUT 1 Ml IF 
. LUrl 1 1 NUC 


A 1 / "5 

014^5c 


A 1 0 7AA 

01 c '00 


AAAA1 L 
0000 1 H 






nuw 


lt^L DO 


0 1 r r 


014256 


1 A y A 1 1 

IOhOI 1 








rK IN 1 L 




;SEN0 IT 


014260 


1 1 V 7A 1 

115^01 


A 1 / A OA 

0146c6 






MAliD 

nUVB 




• CF T Fill rniiMT 

. dC 1 TILL LUUn 1 


014264 


A AC AAA 

005000 






oc • 
T» : 


r 1 D 


DA 
nO 


• CF T kil II 1 
f 9C 1 NULL 


A 1 y 0^ A. 
01 *ICOO 


1 Ay All 
1 0401 1 












• ^FMD F I 1 1 ^ 
« oc WW r 1 L L. w 


A 1 / 0 7A 


AAC tn 1 

00? 301 








fit- C 


R1 


•tiff Fill FOUNT 




AA 1 t 7L 

00 1 3 








one 


9i 




A 4 / ^ y J 

01 4274 


1 Ay AA 0 

1 0400c 


A 1 y C A 7 
01*i5o> 






T vPFM 

1 T r cn , 


45$ 


•TVPF MF^^AGF 


A 1 / 1 AA 


A 1 At 1 7 

0 1 0 3 3 f 


A 1 y ?aA 




M • 

jm • 


nuv 




•^FT MF^G 


A i y TA/ 


1 Ay A 1 1 

10401 3 








DP Art 




■ UAI T FOR K YRD F 1 AG 

f wA i 1 r IK 1 Di/ r L.A\j 


A 1 > 1 A^ 

014306 


A 1 ^'TAA 

012 1 00 


AAAA Xt. 
00003O 






HAu 

nuv 


K^O DO 


■HFl Av FOR HAI F DUPlFX 

f^CL.A1 iwA rlAL.! 1/Wri.L.Ji 


014512 


1 Ay AA 1 

104003 








UCLA 1 


K177 TFMPfH 


■CHFCK IF RUfiOUT 


A 1 y VI/ 

014514 


02t f 3r 


AAAI 77 
000 1 f I 


AA1 1 5A 




TMP 

Lnr 


A 1 / T 5 D 


AA1 An5 
00 1 00c 










15t 


■EXIT IF RUBOUT 




OUU 1 3 1 








IMP 


TTYlH 


•GO TO KYBD CONTROL 


A1 / 1 1 A 


1 aaai a 
1 0*10 1 h 






151- 


TR 
L n 


M\L DO 


■SEND CR 


014552 


All ^AA 

012700 


000014 






HAU 


;SEND FF 


014536 


1 Ay A 1 1 

1 040 1 1 








ODtllTr 


(R4)4 Rl 




A 1 y ly A 

01 4540 


110/ A1 

1 1 c401 








MnuR 
nuwD 


■GET FILL COUNT 


A1 A (/. 3 

U 1 ••5'ie 


U03U0U 






1 1i- 
119* 




RO 


•SET NULL 


Ol43*»H 


1 AAAI 1 
1 0*iOl 1 












■SEND FILLS 


A 1 A tlA, 


AAC tAI 








DEC 


Rl 


•CONTINUE 


014550 


001 374 








BNE 


lis 


.•FINISH NULLS 


014352 


104002 


014424 




121: 


TYPEH, 


10S 


;PRINT HESG 


014556 


104002 








TVPEH 






014560 


000000 






21: 


.yORD 


0 




0U562 


104002 


014452 






TYPEH, 


20J 


;INC TABLE POINTER 


014366 


022525 






CNP 


(R5)*.(R5)* 


014570 


010537 


014376 




3t: 


HOV 


R5,4t 


.-SET HESG 


0U374 


104002 






TYPEH 




:PRINT HESG 


014376 


000000 






41: 


.yORD 


0 




014400 


104002 


014441 






TfPEH. 


50S 




014404 


104002 


014424 






TYPEH. 


10S 





CZlAODQ LA56 OMll/DJll DIAG 
CZLADD.P11 05-AUG-79 09:18 



HACTll 



50A(1052) 05-AU6-79 
OPTION TtSTS 



K 7 
09:23 PAGE H 



S£0 008a 



5818 

5819 

5820 

5821 

5822 

5825 

582^ 

3825 

3826 

3827 

3828 

5829 

3830 

3851 

3852 

5833 

3834 

5835 

3836 

3837 

3858 

3839 

3840 

3841 

5842 

3843 

3844 

3845 

5846 

5847 

5848 

3849 

3850 

5851 

5852 

3853 

3854 

5855 

5856 

5857 

5858 

3859 

5860 

5861 

5862 

3863 

5864 

3865 

5866 

5867 



014410 
014414 
014416 
014420 
014422 

014424 
014432 
014440 
014441 
014446 
014451 
014456 
014464 
014472 
014500 
014506 
014514 
014522 
014530 
014536 
014541 
014546 
014554 
014562 
014567 
014574 
014602 
014610 
014616 
014624 
014626 
014631 
014634 
014637 



005765 
001551 
104006 
104001 
000662 

026455 
020042 
000 
042 
020124 
104 
051523 
043115 
042522 
053523 
040600 
042440 
053523 
051440 
043516 
124 
050123 
044127 
040505 
055 
042523 
044440 
047506 
042105 
000055 
002 
021 
040 
070 



000004 



026455 
043106 

047040 
000 
050105 
043040 
042505 
042523 
052111 
052106 
041501 
052111 
052105 
200 
050131 
041501 
047105 
054504 
026455 
020124 
041516 
046522 
026440 

005 
024 
043 
104 



000055 
020057 

054105 

04252? 
051117 
020104 
020124 
044103 
051105 
020110 
044103 
044524 

020105 
020105 
051040 
200 
020055 
031440 
020110 
042506 
026455 

010 
032 
062 



10S: 
20i: 

30S: 

40S: 



60S: 



TST 

BNE 

CRlF 

CHAIN 

BR 

.ASCIZ 
.ASCIZ 

.ASCIZ 

.ASCII 



4CR5) 
5S 



TES155 



DONE TEST? 
NO, CONTINUE 
TES. SEND CR-LF 
SELECT TEST OR LOOP 
LOOP ON TEST 



/" FF/<57>/ / 
/•• NEXT / 

/DEPRESS FORMFEED RESET SWITCH/<ACRLF>/AFTER EACH SWITCH SETTING/<ACRlF> 



.ASCII /TYPE SPACE WHEN READY/<ACRLF > 



45S: .ASCIZ / SET 3 INCH FORMFEED / 



.BYTE 2. 5. 8., 17., 20.. 26.. 32.. 35.. 50.. 56., 68. 





014642 




.EVEN 




014642 


020040 


000063 


50t: .ASCIZ 


/ 3/ 


014646 


027063 


000065 


.ASCIZ 


/3.5/ 


014652 


020040 


000064 


.ASCIZ 


/ 4/ 


014656 


027065 


000065 


.ASCIZ 


/5.5/ 


014662 


020040 


000066 


.ASCIZ 


/ 6/ 


014666 


020040 


000067 


.ASCIZ 


/ 7/ 


014672 


020040 


000070 


.ASCIZ 


/ 8/ 


014676 


027070 


000065 


.ASCIZ 


/8.5/ 


014702 


030440 


000061 


.ASCIZ 


/ 11/ 


014 706 


030440 


000062 


.ASCIZ 


/ 12/ 


014712 


050440 


000064 


.ASCIZ 


/ 14/ 


014716 


020040 


000040 


.ASCIZ 


/ / 


0U722 


000000 




.WORD 


0 



;ENO OF TABLE 



0U732 00500A 



0U764 104023 



caAooo LA56 OMn/Djn diag 

(ZLA00.P11 05-AUG-79 09:18 

5868 
5869 
5870 
5871 
5872 
3875 

5874 0}U72U 000034 

5875 014726 014724 

5876 014730 104012 
3877 
3878 
3879 

3880 014754 012737 015134 

5881 014742 013703 001112 

3882 014746 012700 000053 

3883 014752 104011 

3884 014754 012700 000062 
5885 014760 104011 

3886 014762 104014 
3887 
3888 
3889 

3890 014766 016401 015224 

3891 014772 000405 

3892 014774 012700 000040 

3893 015000 104011 

3894 015002 005303 

3895 015004 001420 

3896 015006 005301 

3897 015010 001371 

3898 015012 012700 000033 

3899 015016 104011 

3900 015020 012700 000061 

3901 015024 104011 

3902 015026 012700 000010 

3903 015032 104011 

3904 015034 012700 000117 

3905 015040 104011 

3906 015042 005303 

3907 015044 001350 

3908 015046 104014 
3909 
3910 
3911 

3912 015052 013703 001112 

3013 015056 016401 015224 

3914 015062 020127 000001 

3915 015066 001001 

3916 015070 005201 

5917 015072 016402 015250 

3918 015076 160103 

3919 015100 002413 

3920 015102 012700 000011 
5921 015106 104011 

3922 015110 005000 

5923 015112 104011 



HACTll 50A(1052) 05-AU6-79 09:25 
OPTION TFS1S 



L 7 
PAGE P9 



015050 104023 



:xxxxxxxxxxxxxxx 

TEST34 - 
XXXXXXXXXXXXXXX 



TES134: 34 

TEST34 
PRTHDR 



HORIZONTAL TAB OPTION 



015132 



CH6D6: 

0 

2%: 



3$: 
4S: 

51: 



6S: 



17t; 



IIS: 



14S: 



CLR 



«0V 

nov 
nov 

PRINTC 

nov 

PRINTC 
CR 



FOUR 



nov 

BR 

nov 

PRINTC 

DEC 

BEQ 

DEC 

BNE 

nov 

PRINTC 

nov 

PRINTC 

nov 

PRINTC 

nov 

PRINTC 
DEC 
BNE 
CR 



FOUR 



nov 
nov 
cnp 

BNE 

INC 

nov 

SUB 

BLT 

NOV 

PRINTC 

CLR 

PRINTC 



R4 



I16S.12S*2 
WIDTH. R3 
#33. RO 

#62. RO 



20S(R4).R1 
5S 

«40,R0 

R5 
6S 
R1 
4S 

133, RO 

#61. RO 

#10, RO 

#'0,RO 

R3 
3S 



WIDTH. R3 

20S(R4).R1 

R1 ,#1 

IIS 

Rl 

50S(R4).R2 

R1,R3 

12S 

#11. RO 

RO 



.-PRINT TEST HEADER 
;SET TABLE POINTER 

;RESET JUMP INSTR OR FIRST 7i«^E THRU 
:SET COLUnN COUNT 
.•CLEAR OLD TABS 



:D0 A CARRIAGE RETIRN 

;FOUR FILL CHARACTERS CH&06 

;6ET SPACE COUNT FOR TAB 
: SUBTRACT 1 FOR TAB SET 
;6ET SPACE 
:SEND IT 

;DEC COLUnN COUNT 
:CR IF DONE LINE 
;DEC SPACE COUNT 
; CONTINUE IF NOT DONE 
.-SEND IT 

.•SEND 1 - SET TAB 
;SET BACKSPACE 
;PR1NT 0 

;DEC COLUnN COUNT 
.-CONTINUE IF NOT DONE LINE 
.-SEND CR 

;FOUR FILL CHARACTERS CHGD6 

; RESET COLUnN COUNT 

; RESET COLUnN COUNT FOR TAB 

:ADD 1 IF FIRST LINE 



SET FILL CHAR COUNT 
SUBTRACT TAB FROn COLUHN COUNT 
BRANCH IF TOO nANY COLUHNS 
SET TAB 
SEND IT 

SET NULL CHAR - FILLS 
SEND FILL CHARS 



CZLADDO LAi6 Dm11/Dj11 DUG BACtII 50A(1052) 05 
CZLA00.P11 05-AUG-79 09:18 OPTION TESTS 



392A 


015114 


005502 








DEC 


5925 


015116 


001574 








BNE 


5926 


015120 


012700 


000150 






MOV 


5927 


015124 


104011 








PRINTC 


5928 


015126 


000761 








BR 


5929 


015150 


000157 


015154 




12S: 


JHP 


5950 


015154 


012757 


015164 


015152 


16t: 


nov 


5951 


015142 


104014 








CR 


5952 


015144 


104025 








FOUR 


5955 


015146 


012700 


000150 






MOV 


5954 


015152 


104011 








PRINTC 


5955 


015154 


015705 


001112 






MOV 


3956 


015160 


005505 








DEC 


5957 


015162 


000755 








BR 


5958 


015164 


104006 






15t: 


CRLf 


5959 


015166 


005724 








TST 


5940 


015170 


016401 


015224 






MOV 


5941 


015174 


001405 








BEQ 


5942 


015176 


020157 


001112 






CMP 


5945 


015202 


101657 








BLOS 


5944 


015204 


012700 


000035 




15»: 


MOV 


5945 


015210 


104011 








PRINTC 


5946 


015212 


012700 


000062 






MOV 


5947 


015216 


104011 








PRINTC 


5948 


015220 


104001 








CHAIN 


5949 


015222 


000640 








BR 


5950 














5951 


015224 


000001 


000002 


000004 


20S: 


.WORD 


5952 


015252 


000010 


000020 


000040 






5955 


015240 


000100 


000200 


000204 






5954 


015246 


000000 










5955 


015250 


000001 


000002 


000003 


30S: 


.WORD 


5956 


015256 


000005 


00001 1 


000022 






5957 


015264 


000044 


000107 


000111 






5958 


015272 


000000 











M 7 

lG-79 09:25 PAGE 90 



SEO 0090 



R2 
US 

ff'X.RO 

IIS 

ai16S 

<n5SJ2S*2 



WIDTH, R5 

R5 

17S 

(R4)* 

20S(R4),R1 
15S 

Rl .WIDTH 
2S 

#55. RO 
#62, RO 



TEST54 

1 .2. 4, 8. ,16. 



DEC FILL COUNT 
CONTINUE FILLS 
SET X CHAR 
SEND IT 
CONTINUE 

SKIP FOLLOWING AFTER FIRST TIME ThRU 



SEND CR 

FOUR FILL CHARACTERS 

PRINT X 

RESET COLUHNC COUNT 

SUBTRACT ONE FOR FIRST X CHAR 

CONTINUE 

SEND CR-LF 

INC TABLE POINTER 

GET COLUMN COUNT FOR TAB 

EXIT IF DONE TABLE (0) 

CHECK IF TOO LARGE 

CONTINUE TEST. OK 

CLEAR ALL TABS BEFORE EXITING 



.•SELECT TEST OR LOOP ON TEST 
;LOOP ON TEST 



CHGD6 



.52. .64. ,128. .132. .0 



1, 2, 5, 5. 9. ,18. ,56. ,71.. 75. ,0 



CZLADDO LA36 DH11/DJ11 DUG MACVll 
CZLADD.P11 03-AU&-79 09:18 

5959 
5960 
5961 
3962 
5963 
5964 

5965 015274 000055 

5966 015276 015274 

5967 015500 104012 

5968 015302 104002 

5969 015504 015615 

5970 015506 104015 

5971 015510 012700 000036 

3972 015314 104003 

3973 015316 022737 000177 001124 

5974 015324 001505 

5975 015526 005004 

5976 015550 012700 000053 

5977 015554 104011 

5978 015356 012700 000064 

5979 015542 104011 

5980 015344 104002 

5981 015346 015573 

3982 015350 005204 

3983 015552 020427 000013 

5984 015356 003013 

5985 015560 010401 

5986 015362 104010 
3987 015564 005501 

5988 015366 001575 

5989 015370 012700 000033 

5990 015374 104011 

5991 015376 012700 000063 

5992 015402 104011 
5995 015404 000757 

5994 015406 012700 000014 

5995 015412 104011 

5996 015414 104002 

5997 015416 015707 

5998 015420 104013 

5999 015422 012700 000036 

4000 015426 104003 

4001 015430 022757 000177 001124 

4002 015436 001440 
4005 015440 005004 

4004 015442 104002 

4005 015444 015572 

4006 015446 005204 

4007 015450 020427 000013 

4008 015454 003014 

4009 015456 012700 000013 

4010 015462 104011 

4011 015464 010401 

4012 015466 162701 000020 
4015 015472 003763 

4014 015474 005000 



50A(1052) 05-AUG-79 
OPTION TESTS 

XXXXXXXXXXXXXXX 



TEST35; 



N 7 
09:25 PAGE 



91 



SEO 0091 



IS: 



2t: 



3S; 



55t: 



4S: 



5»: 





VERTICAL TAB 


OPTION 


(XXXXXXXX 










TC C T 










.•PRINT TEST HEADER 


T V DC M 

1 1 rtn 




.•TYPE INSTR 








DC Af\ 

Kt AD 




.-WAIT FOR KYBD FLAG 


HUV 


MXn DA 


.-DELAY FOR HALF DUPLEX 


nci Av 






mo 


M^7^ T CHPr u 

• 1 f 1 , 1 CnrtH 


.-CHECK CHAR 


Qcn 




.-EXIT TEST IF RUBOUT 






;SET LINE COUNT 


nuv 


gxx on 


.•CLEAR VERTICAL TABS 


DD 1 uT r 

r K I N 1 V. 






nuv 


•Ot , nU 




PQ 1 iiTr 






T VPCM 




.-TYPE REF LIKE 


1 SI 






1 iir 

INt 




;INC LINE COUNT 






:CH£CK IT 


Dv 1 




.-BRANCH IF DONE REF. 


nuv 


BL B1 


;6ET LF COUNT 


1 c 
L r 




:SEND LF 




R1 


.•DEC LF COUNT 


BMC 
DfIC 


zc 


.-CONTINUE 


MOU 

nii V 


Jr33 RO 


.-SET TAB FOR THIS LINE 


PRINTf 






nuv 






PR 1 MTf 






RB 


Cw 


: CONTINUE 


nuv 


M^L RO 
IP 1 *f « nU 


;SEND FF 


PRINTr 






^ VPFM 




.-TYPE HESG 












:UAIT FOR KYBD FLAG 


MOW 

nuv 


#30 RO 


;DELAY FOR HALF DUPLEX 


nFl AV 






TMP 

^nr 


#177 TFMPfN 

•III #1 tnr vM 


;CHECK CHAR 


BFQ 


1 ?% 


.-EXIT TEST IF RUBOUT 


L L n 




; RESET LF COUNT 


TYPEH 




.-TYPE REF LINE 


lOt 






INC 


R4 


;INC LINE COUNT 


CUP 


R4,II13 


.-CHECK IT 


BGT 


BS 


:BRANCH IF DONE 


HOV 


#13, RO 


.-SEND TAB 


PRINTC 






nov 


R4,R1 


;SET FILL COUNT 


SUB 


#16.,R1 


;SUBTRACT 16 


BLE 


U% 


:SKIP NULLS IF COUNT < 0 


CLR 


RO 


.-SET NULL CHAR 
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OPT 1 on 


TFSTS 








AOo 


0o4 76 


1 A y A 1 1 

10401 1 








PRINTC 






.-SEND NULLS 




nice p\.f\. 

015500 


AAC T A * 

00550 1 








DEC 


R1 




;DEC COUNT 




015502 


AAi S 7y 

001 574 








BNE 


5t 




.•FINISH NULLS 


^018 


015504 


AAA '9 C A. 

000756 








BR 


4$ 




.•CONTINUE 


4019 


A 1 C C Al. 

015506 


A 1 ^ 7AA 

012700 


000055 




8S: 


MOV 


#55. RO 




.•CLEAR VERTICAL TABS 


<i020 


0 i55i2 


1 Ay A4 1 

10401 1 








PRINTC 








A021 


01 55 14 


A i T T AA 

01 2700 


000064 






HOV 


#64, RO 








015520 


4 A / A 4 1 

10401 1 








PRINTC 








4025 


015522 


012700 


000014 






nov 


«14,R0 




.SEND FF 


4024 


01 5526 


1 A / A 1 1 








PRINTC 








4025 


A 1 C C T A 

015550 


1 Ay f\t\L. 

104006 








CRLF 






.•SEND CR-LF 


4026 


A1 CC Z 0 

015552 


1 A/ A 1 A 

104010 








LF 






;SEND BLANK LINE 


4027 


A 1 C C Z / 

01 5554 


1 A/ AA 1 

1 04001 








CHAIN 






; SELECT TEST OR LOOP ON TEST 


4028 


A 1 C C Z^ 

015536 


AAA^C^ 

000656 








BR 


TEST55 




;LOOP ON TEST 


4029 


A1 CC/ A 

01 5540 


A1 0 7AA 

01 Cf 00 


000055 




12S: 


nov 


#55. RO 




.•CLEAR ALL TABS BEFORE EXITING TEST 


4050 


A 1 C C/ / 

01 ^544 


1 A/ A1 1 

1 0401 1 








PRINTC 








/All 

4051 




A 1 0 7AA 
01c '00 


000064 






NOV 


#64, RO 






/An 


A 1 C C k 

01 535i. 


1 A/ A 1 1 
1 0401 1 








PRINTC 








/ A Z T 

4055 


A1 C C C/ 

01 5554 


n 1 3 7AA 

01 c '00 


000014 






«0V 


#14, RO 




.•SEND FF 


/AX/ 

4054 


A1 C( AA 

U 1 5 5 OU 


1 A/ A 1 1 

1 U40 1 1 








PRINTC 








i A T C 

4055 


A 1 C C ^ 1 

01 bjoi 


1 A/ AA^ 

1 04006 








CRLF 








/ ATI. 

405o 


01 5504 


1 A/ A 1 A 

1 0*iU1 u 








LF 








/ A T 7 

405' 


Ul 5566 


AAAI X7 

000 1 5 ' 


002540 






J HP 


TTYlH 




:G0 KYBD CONTROL 


4058 




















/ATA 

40 by 


A 1 C t 7 T 

0 05 r <: 


A/ A 

040 






lot: 


.ASCII 


<40> 






/ A / A 

4040 


A 1 C C 7 X 

0155/5 


A C C 

055 


026455 


026455 


151: 


.ASCIZ 


/ 


-««««/<15> 


/ A/ 1 

404 1 


A 1 C^AA 

01 5000 


A?A/ CC 

0<:0455 


056055 


056074 












/ A/ *> 

404£ 


A 1 CikAi^ 

01 5000 


AXAA 7L 

0500 ' 4 


056074 


006474 












/ A / T 

4045 


A 1 C ^ 1 / 

0 1 561 4 


AAA 

000 
















4044 


A 1 C ^ 1 C 
01 561 5 


1 tx 


052105 


050440 


20S: 


.ASCII 


/SET 14 


INCH 


FORK FEED/<ACRlF> 


/ A/ C 

404^ 


01 56<:c 


UcU004 


047111 


044105 












/ A/ ^ 

4040 


Ul 565U 




051117 


020115 












/-A/ 7 
4U*« / 


U 1 5050 


Umc 5U0 


042105 


200 










Of FORH RESET SWITCH/<ACRLF><12><12> 


4040 


U 1 50*1 5 


1 u*» 


050105 


042522 




.ASCIZ 


/DEPRESS 


TOP 


/ A/ O 


U 1 505U 


05 1 5c J 


052040 


050117 












/ ACA 

40t0 


01 5650 


A/ 7/ / A 

04 '*»*»U 


020106 


047506 












/ A C 1 

40? 1 


01 5064 


A/ AC 5 3 

0'«05cc 


051040 


051505 












/ AQ 0 
403£ 


A 1 7 5 

01 50' t 


U5c 1 u5 


051440 


044527 












/ A^ t 

hOj J 


U 1 5 f UU 


A/ 1 c 3/ 


100110 


005012 












/ AC/ 

40^4 


0 1 5 f\)0 


'\'\f\ 


















ni S707 


001 


000401 


042522 


50$: 


.ASCIZ 


<1><1><1>/R£«QVt /<57>/ RESET REF/ 


4056 


015714 


047515 


042526 


027440 












405? 


015722 


051040 


051505 


052105 












4058 


015750 


051040 


045105 


000 












4059 




015756 








.EVEN 
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4060 

4061 

4062 

4063 

4064 

406S 

4066 

4067 

4068 

4069 

4070 

4071 

4072 

4073 

4074 

4075 

4076 

4077 015756 

4078 015756 022737 000176 

4079 015744 001125 

4080 015746 023727 001124 

4081 015754 001121 

4082 015756 010046 
4085 015760 010446 

4084 015762 013700 001124 

4085 015766 104002 

4086 015770 020121 

4087 015772 000402 

4088 015774 010046 

4089 015776 010446 

4090 016000 104002 

4091 016002 020150 

4092 016004 017746 165254 
4095 016010 004757 016222 

4094 016014 005726 

4095 016016 104002 

4096 016020 020145 

4097 016022 005057 001252 

4098 016026 012757 000007 

4099 016054 104022 

4100 016036 000776 

4101 016040 013700 001124 

4102 016044 104011 

4105 016046 013757 001124 

4104 016054 042757 177600 

4105 016062 122757 000025 

4106 016070 001001 

4107 0'^072 000742 

4108 016074 122757 

4109 016102 001005 

4110 016104 104007 

4111 016106 022757 000007 

4112 016114 001055 
4115 016116 122757 000060 

4114 016124 005004 

4115 016126 122757 000067 
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CHECK SylTCH REGISTER ROUTINE. CHECKS FOR "G TO ALLOW 
CHANGING OF LOC 176. ROUTINE IS ENTERED AT CNTLU FOR START UP PURPOSES. 
WHEN A *G IS GIVEN. THE PROGRAM ENTERS AT CKSUR. THE PROGRAM 
GETS CONTENTS OF SOFT. SWITCH REG. TYPES IT OUT, AND THEN 
SEEKS NEW DATA FROM OPERATOR. ONCE DATA IS SUPPLIED, IT INSERTS THIS 
DATA INTO THE SOFT. SWITCH REG. AND RESUMES OPERATION IN THE 
MAIN PROGRAM. INCORRECT ENTRIES (SUCH AS 8. 9. LETTERS) ARE DELETED 
AND THE PROCESS RESTARTED. TYPING *U ALLOWS THE PRESENT ENTRY 
TO BE DELETED AND THE PROCESS RESTARTED. 



:xxxxxxxxxxxxxxxxxxxxxxxx 



001244 
000007 



001254 



001250 
001250 
001250 



000015 001250 

001254 
001250 
001250 



CHGD7: 



c r V c uD ■ 
•CK^WK : 


CMP 


tfCUfiCf CD 

f SWRcu , Sn 


;SOriWAKc 5W Rcu PRtS? 




Que 

dNc 


OUT 


■ UA rc T Al iT 

;NU, GET OUT 






1 tnrCH.f f 


; 1 S I T A b 




BNt 


UU 1 


• &IA r CI Al 1 T 

; NU , be 1 UU 1 




MOV 


DA . / C D \ 


• C A \lC DA 

;bAVt rU 




MOV 


D/ . / C D \ 


• C Akf C D/ 

;bAVt R4 




nUV 


TCMDru DA 


«CCT 1 ID TA DDfAlT *r 

,it\ Ur lU rKlNI b 




T VDCH 

1 TrtH 




• TVDC MCCCirC DAIlTIAiC 
;iTrt ntooAbC KUUIINC 




f Ml r. 
LN 1 u 








DP 

an 


nuC D 
UVCK 




*LN 1 LU • 


nuv 


on - ( CD ^ 


I jAVt KU 






OL . f C D ^ 


■ C All C DA 


UvcK : 


T V DC M 

1 Trcn 

CUD 




• Al 1 nu CUD* TA DC TVDCf\ Al IT 

; ALLUW 9WK- lU DC 1 Trci/ UUI 






acD • r CD ) 
•aw, "lor; 


• MAW rAAlTCAlTC AC CUD 
,nUV LUNicNIa Ur 9WK 




JSR 


PC TYPOC 


■OCTAL Type out routinf 




POPSP 




; CORRECT STACK POINTER 




TYPEM 




: ALLOW NEW= TO BE TYPED 




NEW 








CLR 


TEMPST 


; CLEAR TEMP STORAGE LOC 




MOV 


#7. COUNT 


;SET UP TO ACCEPT 7 CHAR 


It: 


INRDY 
BR 


IS 


:IS CHARACTER THERE? 




MOV 


TEMPCH.RO 


:SET UP FOR PRINT ROUTINE 




PRINTC 


: PRINT ROUTINE 




MOV 


TEMPCH.TIB 


:STORE BUFFER 




BIC 


#177600,1 IB 


;STRIP OFF GARBAGE 




CHPB 


#25. TIB 


;IS IT A 'U 




BNE 


2S 


.■BRANCH IF NOT 


5S: 


BR 


OVER 


.•START OVER 


2S: 


CMPB 


#15, TIB 


;IS IT A <CR> 




BNE 


4t 


: BRANCH IF NOT 




SCR^F 








CMP 


#7, COUNT 


;WAS <CR> FIRST CHAR 




BNE 


7$ 


:CHANGE SWREG IF NOT FIRST <CR> 


4S: 


CHPB 


#60. TIB 


; IS IT LESS THAN 0 




6GT 


5S 


;G0 TO ? ROUTINE IF SO 




CMPB 


#67, TIB 


;IS IT GREATER THAN 7 
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^,116 


016154 


002005 








BGE 


6S :G0 TO ? ROUTINE IF SO 


4117 


016156 


104002 






5S: 


TfPEH 


:SET UP FOR ' TYPEOUT 


4118 


016140 


020155 








QUEST 






4119 


016142 


000716 








BR 


OVER .-START INPUT STRING OvER 


4120 


016144 


006557 


001252 




6S: 


ASL 


TEHPST .-HULTlPtr BY 10 


4121 


016150 


006557 


001252 






ASL 


TEWPST 




4122 


016154 


006557 


001252 






ASL 


TEHPST 




4125 


016160 


142757 


000060 


001250 




BICB 


#60. TIB 


CLEAR OF ASCII 


4124 


016166 


155757 


001250 


001252 




BISB 


TIB.TEHPST 


HOV CHAR TO TEHPST 


4125 


016174 


005557 


001254 






DEC 


COUNT 


ONLY WANT 6 NUMBERS AND <CR> 


4126 


016200 


001756 








BEQ 


51 


IF = 7 TOO MANY NUMBERS 


.127 


016202 


000714 








BR 


IS 


GET NEXT CMAR 


4128 


016204 


015777 


001252 


165052 


7t: 


NOV 


TEHPST.aSR 


CHANGE SUR CONTENTS 


4129 


016212 


012604 








nov 


(SP)*,R4 


iRESTORE REG 4 


4150 


016214 


012600 








nov 


ISP)*,R0 


; RESTORE REG 0 


4151 


016216 


104006 








CRLF 




; CARRIAGE RETURN 


4152 


016220 


000002 






OUT: 


RTl 




; RE TURN TO PROGRAM 



4155 
4154 
4155 



*• 1 JO 


U 1 Occc 


1 \ C I Jl 


nnnnni 


nni 


T vpnr • 


MnuR 
nuwD 


If 1 (III 


^FT THP 7PPn Mil ^UlTfM 




r 1 <.? Tfl 
\j 1 ocj\j 


1 1 5 7T7 

1 \ CI Jl 




nni ?Ai 

<J\j 1 CO I 




nu VD 


90 , nuuc ' 1 4 


jLi run oiA UiOiiO 




U lOc^O 


1 1 37X7 


nnnnni 


nni 

\J\J 1 COC 




MDUR 

nuvD 


> 3 . LN 1 ■ 


^FT IMP ITPQATinM milMT 


L 1 TO 


U 1 Oc'*'* 


U 1 UUhO 








nu V 


nU » V jr / , 


^AuP QPa 0 


/ 1 L(\ 
H 1 HU 


U 1 Oc*tO 










nu V 


DX .(CP) 




*t 1 •» 1 


U 1 OCj\j 


ni f\LL(\ 








nu V 


R4 -(^P) 




•t 1 


rtl tJCJ 


rtl n^/.A 








nu V 


n J . V Or / 1 


SAVE R5 


L\L\ 


ftl t^JKL 
U 1 DC JH 


1 1 XTCiL 
\ \ Jl UH 


rtrti 3*,i 






MnuR 
nu VD 


nuuc ^ 1 . 1 




L 1 LL 
•« 1 •»*» 


\J 1 DcOU 












R4 




4 1 •»> 


U 1 OcOc 


n/.5 7n/. 

UOci UH 


nnnnni 






Ann 




^llRTRAfT IT FOR MAIT Al 1 nuFf) 


<l 1 HO 


U 1 Oc03 


1 1 nAT7 


nni 3Art 






MnuR 
nu VD 




^AUF IT FOR li^F 


4147 


016272 


115704 


001256 






novB 


FILL. R4 


get THE ZERO FILL SWITCH 


4148 


016276 


016605 


000012 






MOV 


12(X6),R5 


PICKUP THE INPUT NUMBER 


4149 


016502 


005005 








CLR 


R5 


■CLEAR THE OUTPUT WORD 


4150 


016504 


006105 






1$: 


ROL 


R5 


ROTATE MSB INTO "C" 


4151 


016506 


000404 








BR 


51 


GO DO MSB 


4152 


016510 


006105 






2$: 


ROL 


R5 


FORM THIS DIGIT 


4155 


016512 


006105 








ROL 


R5 




4154 


016514 


006105 








ROL 


R5 




4155 


016516 


010505 








MOV 


R5.R3 




4156 


016520 


006103 






5$: 


ROL 


R5 


GET LSB OF THIS DIGIT 


4157 


016522 


105557 


001260 






DECB 


MODE 


•TYPE THIS DIGIT? 


4158 


016526 


100012 








BPL 


7% 


BR IF NO 


4159 


016550 


042705 


}777?0 






BIC 


f177770.R5 


-GET RID OF JUNK 


4160 


016554 


001002 








BNE 


4S 


TEST FOR 0 


4161 


016556 


005704 








TST 


R4 


;SUPPRESS THIS 0 


4162 


016540 


001405 








BEG 


5$ 


;BR IF YES 


4165 


016542 


005204 






4S: 


INC 


R4 


•DON'T SUPPRESS ANYMORE 0*S 


4164 


016544 


052705 


000060 






BIS 


#60.R5 


;HAKE THIS DIGIT ASCII 


4165 


016550 


010500 






5$: 


nov 


R5,R0 


; SETUP FOR PRINT ROUTINE 


4166 


016552 


104011 








PRINTC 




; COUNT BY 1 


4167 


016554 


105557 


001262 




7$: 


DECB 


CNT 


4168 


016560 


005553 








BGT 


2i 


;BR IF MORE TO DO 


4169 


016562 


002402 








BLT 


6S 


;BR IF DONE 


4170 


016564 


005204 








INC 


R4 


; INSURE LAST DIGIT ISN'T A BLANK 


4171 


016366 


000750 








BR 


21 


;G0 DO THE LAST DIGIT 
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016570 
4175 016572 
A174 016574 

4175 016576 

4176 016400 
4177 

4178 
4179 
4180 
4181 
4182 



012605 
012604 
012605 
012600 
000207 



6S: 



MOV 
MOV 
«0V 

nov 

RTS 



(SP)*.R5 
(SP)».R4 
(SP)*.R5 
ISP)*,R0 
PC 



RESlORt R5 
RESTORE R4 
RESTORE R5 
RESTORE RO 

RETURN FROn SUBROUTINE PC 
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A185 

i,m 

<.185 

4186 

4187 

4188 

4189 

4190 

4191 

4192 

4195 

4194 

4195 

4196 

4197 

4198 

4199 

4200 

4201 

4202 

4205 

4204 

4205 

4206 

4207 

4208 

4209 

4210 

4211 

4212 

4215 

4214 

4215 

4216 

4217 

4218 

4219 

4220 

4221 

4222 

4223 

4224 

4225 

4226 

4227 

4228 

4229 

4230 

4251 

4232 

4253 

4234 

4235 

4236 

4257 

4238 
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SEO 0096 



.SBTTL DHll VARIABLE PARAMETER TABLE 



0H11 PROGRAMMABLE PARAMETER TABLE 

THIS TABLE IS PROVIDED TO ALLOW THE DEGREE OF FREEDOM AVAILABLE 
IN THE DHll PROGRAMMABLE MULTIPLEXER. THERE ARE 256 ENTRIES. ONE 
FOR EACH OF THE POSSIBLE 16 LINES ON EACH OF THE POSSIBLE 16 
DHirS. EACH Of THE 256 LINES ARE INITIALIZED AS FOLLOWS: ( = 16707) 

CHARACTER LENGTH = 8 BITS 

NO. OF STOP BITS = 2 

PARITY GEN. AND DET. NONE 

OPERATING MODE FULL DUPLEX 

TRANSMITTER SPEED = 300 BAUD 

RECEIVER SPEED = 300 BAUD 

IF ANY LINE SHOULD DIFFER. THE APPROPRIATE ENTRY FOR THE LINE 
SHOULD BE CHANGED BEFORE RUNNING THE DIAGNOSTIC. REFER TO THE LINE 
PARAMETER REGISTER IN THE DH11 PROGRAMMING MANUAL FOR INSTRUCTIONS. 



016402 


000020 


DH1100: 




016402 


016707 


.WORD 


16707 


016404 


016707 


.WORD 


16707 


016406 


016707 


.WORD 


16707 


016410 


016707 


.WORD 


16707 


016412 


016707 


.WORD 


16707 


016414 


016707 


.WORD 


16707 


016416 


016707 


.WORD 


16707 


016420 


016707 


.WORD 


16707 


016422 


016707 


.WORD 


16707 


016424 


016707 


.WORD 


16707 


016426 


016707 


.WORD 


16707 


016430 


016707 


.WORD 


16707 


016452 


016707 


.WORD 


16707 


016434 


016707 


.WORD 


16707 


016436 


016707 


.WORD 


16707 


016440 


016707 


.WORD 


16707 


016442 


000020 


DHllOl : 




016442 


016707 


.WORD 


16707 


016444 


016707 


.WORD 


16707 


016446 


016707 


.WORD 


16707 


016450 


016707 


.WORD 


16707 


016452 


016707 


.WORD 


16707 


016454 


016707 


.WORD 


16707 


016456 


016707 


.WORD 


16707 


016460 


016707 


.WORD 


16707 


016462 


016707 


.WORD 


16707 


016464 


016707 


.WORD 


16707 


016466 


016707 


.WORD 


16707 


016470 


016707 


.WORD 


16707 


016472 


016707 


.WORD 


16707 
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SEO 0097 



<.^59 

A2A1 
<.2A2 
A2A5 
<i24<i 

<.246 

4247 

4248 

4249 

4250 

4251 

4252 

4253 

4254 

4255 

4256 

4257 

4258 

4259 

4260 

4261 

4262 

4263 

4264 

4265 

4266 

4267 

4268 

4269 

4270 

4271 

4272 

4275 

4274 

4275 

4276 

4277 

4278 

4279 

4280 

4281 

4282 

4283 

4284 

4285 

4286 

4287 

4288 

4289 

'»290 

4291 

4292 

4295 

4294 



016474 
016476 
016500 
016502 
016502 
016504 
016506 
016510 
016512 
016514 
016516 
016520 
016522 
016524 
016526 
016550 
016552 
016534 
016556 
016540 
016542 
016542 
016544 
016546 
016550 
016552 
016554 
016556 
016560 
016562 
016564 
016566 
016570 
016572 
016574 
016576 
016600 
016602 
016602 
016604 
016606 
016610 
016612 
016614 
016616 
016620 
016622 
016624 
016626 
016650 
016652 
016634 
016656 
016640 
016642 
016642 



01670 

01670 

01670 

000020 

01670 

01670 

01670 

01670 

01670 

01670 
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020040 
020040 



055105 
100060 
055065 
044515 
044504 
052125 

050510 
045104 
052116 
042505 

047105 
050040 
040 
050060 

042040 
020123 
020122 
005200 
020060 
051447 
051105 
100124 
052012 
000045 
020060 
047115 

042520 
050040 
041101 
040510 
051105 
042116 
042524 
020122 
027056 
027056 
027056 
052117 
045525 
052514 
000 
041505 
051505 
046522 
042105 

020040 



ENDPAS: 

PASMES: 
DHllS: 



040514 STARTH: 

052040 
040516 
045501 
041511 



020061 
050461 
051105 
100125 

020104 
051501 

100060 

050510 
047125 
042524 
000 
045104 
052440 
052040 
000012 
051505 

047505 
100125 

040440 
044522 
042514 
040522 
040 
046040 
020116 
042502 
027056 
027056 
000056 
042440 
020110 
047115 

047510 
020124 
047111 
000200 



.SBTTL OIAGNOSIIC MESSAGES 

. ASCI 1 <ACRLf ><1 7>/CZLA000/<ACRLF > 

.ASCII /LA36 TERMINAL DIAGN0STIC/<ACRLF> 

.ASCIZ /DHll I DJil INTERFACES/<ACRLF><12> 

.ASCII <ACRLF><12>/EN0 OF PASS / 

.ASCIZ /0000/<ACRLF><12> 

.ASCIZ /OO DM1 rs UNDER TEST/<ACRLF ><12> 



DJilS: .ASCIZ /OO DJll'S UNDER TEST/<ACRlF><12> 

HDRHSG: .ASCIZ <ACRLf ><1 7><1 2>/TEST •/ 

HDRO: .ASCIZ /OOO COLUnNS/<ACRLF ><12> 

E025nA: .ASCII /TYPE ANY PRINTABLE CHARACTER / 

• ASCIZ /AND LISTEN fOR BELL / 

E025NB: .ASCIZ <ACRLF>/N0T ENOUGH COLUHNS/<ACRLF > 

ECOEND: .ASCIZ <ACRLF>/ECMO TEST TERH1NATED/<ACRLF > 



E023N: .ASCII / / 
LINE5: .ASCII / / 



;nESG FOR TEST £025 



CZLADOO LA56 
CZLA00.P11 



DMll/DJll 
05-AUG-79 



DIAG 
09:18 



HACVII 



50A(1052) 05-AUG-79 09:25 
DIAGNOSTIC MESSAGES 



N 8 

PAGE 



104 



SEO 0104 



4576 


020054 


020040 


020040 


020040 


LINE5A: 


.ASCIZ 


/ /<ACRLf> 


4577 


020062 


020040 


000200 










4578 


020066 


007600 


051412 


046105 


nESG5: 


.ASCIZ 


<ACRLf ><17><12>/SElECT 


4579 


020074 


041505 


020124 


042524 








4580 


020102 


052125 


021440 


020040 








4581 


020110 


000 












4582 
















4585 


020111 


105 


042526 


116 


EVEN: 


.ASCII 


/EVEN/ 


4584 


020115 


117 


042104 


040 


ODD: 


.ASCII 


/ODD / 


4585 
















4586 










« 






4587 










:CHGD8 






4588 
















4589 


020121 


040 


057040 


020107 


iNTG: 


.ASCIZ 


/ *G / 


4590 


020126 


000040 












4591 


020150 


007600 


020012 


051440 


SUR: 


.ASCIZ 


<ACRLf ><17><12>/ SWR= 


4592 


020156 


051127 


020075 


000 








4595 


020145 


040 


047040 


055505 


NEW: 


.ASCIZ 


/ NEW= / 


4594 


020150 


020075 


000 










4595 


020155 


040 


057440 


020040 


QUEST: 


.ASCIZ 


/ ? / 


4596 


020160 


000 












4597 




020162 








.f VEN 




4598 
















4599 
















4600 
















4601 




000001 








.END 





I 



CZLADDO LA56 
CZLA0D.P11 

ACRlF = 000200 



DHll/DJll 
05-AU&-79 



ACTIV 

ADTENP 

BAR 

BMUB 

BITO = 
BITl = 
BHIO = 
BITII = 
Bni2 = 
81115 = 
BIIU = 
Bni5 = 
BIT2 = 

8115 = 
BlU = 
BITS - 

8116 = 
BITZ r 
B1T8 = 
8119 = 
B10ASC= 
BUFR 
BYCR 
CAR A 
CHAIN = 

CHAINN 

CHAlNt 

CHARAC 

CH0D10 

CH0D5 

CH6D4 

CH(>D3 

CHG06 

CM&07 

CHG09 

CKSWR : 

CLEAN = 

CNT 

CNTDH 

CNTG 

CNTLSy 

CNILU = 

CNVC1R 

COUNT 

CR 



001222 
004412 
001 1 SO 
001162 
000001 
000002 
002000 
004000 
010000 
020000 
040000 
100000 
000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
104015 
012254 
001146 
001144 
104001 

002054 
002062 
006160 
004572 
001516 
002054 
005476 
014732 
015736 
001502 
104024 
104017 
001262 
001154 
020121 
001104 
104025 
004404 
001254 
104014 



CRlF : 104006 



CSR 001236 
CURIST 001120 
DELAY : 104005 



DIAG 
09:18 

1554# 

4556 

1457# 

2280 

14461 

1',51# 

1555/» 

1336« 

1345# 

1346* 

1347* 

1348JV 

1349* 

1350# 

1337# 

1358* 

1559* 

1340* 

1341* 

1342* 

1343* 

1344* 

1371* 

5426 

1445* 

1444* 

1559* 

5225 

1645* 

1616 

2484 

2384* 

1495* 

1642* 

2028* 

5878* 

4077* 

1541* 

1578* 

1573* 

1474* 

1448* 

4086 

1428* 

1379* 

2278* 

1471* 

1370* 

3800 

1364* 

2973 

5554 

4131 

1463* 

1454* 

1561* 
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2262 

4559 

1619* 

2299* 

1864* 

1880 



1798 



1645 

1504 

4138» 

1834» 

4589* 

1505* 

1548 

2290* 

4098* 

2358 

5886 

1582 

2977 

5557 

1925* 

1668 

1598 



5667 
4541 
1680 

2046 
1907 



2404 
1665 
4167» 
1845* 

1645 

2295* 

4111 
2806 
5908 
1610 
5010 
5560 

2056« 

1775 
1718 



3749 
4545 
1707 

20S3» 



20V9 




3^ <T 


1748 






2843 






1613 


1801 


2056 


1569 


1581 


1609 


3452 


3457 


5472* 


1862* 


2051* 




I860* 


2050* 




2651 


2679 


2749 


3251 


5277 


5366 


1996 






1661* 


1805 




2616* 







2448 
1760 



5753 
4549 
1774* 



3757 
4551 
1793* 



5829 
4565 



5839 
4569 



4044 
4576 



4048 
4578 



4524 
4591 



4526 



SEO 0105 
4551 



2594 
5188 



2819 
5469 



2854 
5510 



2914 
5559 



2978 
5665 



3045 
3726 



3094 
3821 



3115 
5948 



5144 
4027 



5191 



1871 


1874* 


1891* 


1900* 














1755« 


1 757* 


1750. 


1769* 


1788* 


1798 


1801 








4125* 
2814 


2849 


2866 


2907 


2971 


5005 


5022 


5059 


5177 


5781 


5951 
2182 
5027 
5575 


2567 
5044 
5599 


2648 
3090 
3614 


2674 
3093 
5650 


2741 
5110 
5647 


2748 
5170 
5657 


2900 
5246 
5820 


2909 
5272 
5958 


2915 
5445 
4025 


2960 
5456 
4055 


2057 

1825« 

1755 


1745 


1790 


1805 


2475 


2505 


2591 


2895 


2911 


2955 



CZLAODO LA56 
CZLAD0.P11 
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2975 


5069 


3135 


3217 


dhadr 


001134 


1440/V 


1550* 


1835 




OHCNT 


001230 


1460# 


1552* 


1535* 


1541 


DHl IS 


017564 


1607 


1612 


4541* 




OHi 100 


016402 


1870 


2426 


4208* 




0H11O1 


016442 


4225/» 








OHi 102 


016502 


4242# 








DHl 103 


016542 


42591 








OHi 104 


016602 


4276* 








DHllO^ 


016642 


42931' 








0H1106 


016702 


4310* 








OHi 107 


016742 


4327* 








DHl 110 


01 7002 


4344* 








OHi 1 1 1 


017042 


4361* 








OHi 1 12 


01 7102 


43780 








0Hin3 


01 7142 


4395* 








OHi 1 14 


017202 


4412* 








OHi 1 1 5 


01 7242 


4429* 








OHi 1 16 


017302 


4446* 








OHi 1 1 7 


01 7342 


4463* 








OIGIT 


004406 


2282* 


2285* 


2288* 


^ ^ on 

2289 


OISPLA 


001246 


1468* 


4 f A 4 ^ 

1501 • 






OlSPRE 


0001 74 


1411* 


4 C A 4 

1501 






OJCNT 


001226 


1459* 


4 C 4 n A 

1519* 


1 523* 


1 C y T 

1 545 


OJl IS 


017613 


1 579 


4 C D / 

1 584 


y c y C M 

4545* 




OLt 


0041 74 


1998 


2216* 






ECHO s 


104021 


1375* 


4 7 ^ A 

1 720 


1 735 






3629 


3720 






ECHODJ 


003600 


2045 


2055* 




5565 


ECOEND 


02001 7 


5224 


T T C A 

5250 


5276 


eltab 


01 7402 


1893 


2425 


2554 


45U4* 


EWT INT 


003346 


1 598 


1 n 7Q ii 






EMTTAB 


003422 


1987 


1995f 






ENDIT 


005432 


2423 




CJOfK 


£)5£ 


ENDITD 


005424 


2456 


2460 


£464 


£467 


ENOITR 


005416 


2409 


2503* 


2539 




ENOPAS 


01 7536 


V 1 nA 

3190 


/ C V A « 






EN03 


001432 


1518 


4 C « 

1 526* 






EN04 


001 500 


4 C T 4 

1531 


i C 7 O « 

1 558* 






E020 


on 126 


1 n c 1 

1951 


521 2* 


5486 




E021 


01 1 1 72 


1952 


3215 


5257* 




E021A 


01 1200 


3240* 


5252 




H77 


E021B 


01 1234 


2416 


^ / c n 

2459 


C y ^ 

2546 


E022 


01 1244 


4 nc V 

1953 


5258 


5261* 




E022A 


01 1252 


3264* 


T ^ 70 

3278 






E0226 


011314 


2420 




2550 




E023 


01 1530 


4 nf J 

1954 


5262 


5551* 




E025M 


020046 


3346 


5565 


45 75* 




E024 


012052 


1 nc c 

1955 


V f t ^ 

3552 




5«i f U 


E024B 


A 4 ^ A ^ A 

012060 


3425* 


5445 


5460 


E024R 


A • ^4 « A 

012140 


251 7 


Vy / 0 ji 

544Z* 






cue? 




1 QSA 

1 T JO 








E 02 SUA 


017672 


3491 


3494 


4554* 




E02Sn8 


017772 


3507 


4565* 






EVEN 


020111 


3391 


4585* 


4147 




f ILL 


001256 


1472* 


4136* 





3269 
1606 



3336 
1703 



3429 
1833 



3497 
2594 



5618 
2427 



5777 



3796 3972 



SEQ 0106 
4000 



2296* 
1578 
1807 
3468 



2537 
2504* 



1592 
2159 
3509 



2609 
2543 



1890 
2326 
4569* 

2547 



2531 
2328 



2555 



2398 2535 3221 3439 3503 



2551 



2574 2578 2582 



3249* 
3275* 



CZLADOO LA56 OhII/OjII DUG HACrll 30A(10S2) 05-AU&-79 09: 



czladd. 


P11 03-AUG-79 


09:18 




CROSS 


REFERENCE 


TABLE 


fORWD = 


104016 


1372* 


1667 


1773 






fOUR = 


104023 


1377* 


3888 


3910 


5932 




HDRHSG 


017642 


2355 


4549* 








HDRO 


017654 


1567 


2638 


4551* 






HERE 


010750 


3138 


3144* 








INRDY = 


104022 


1376* 


2399 


2536 


3737 


4099 


lOSW 


001224 


1458« 


1487» 


1489* 


1576 


1620 


Lf = 


104010 


1366« 


2368 


2818 


2839 


2855 






4036 










lfcnt 


001132 


1439# 


2834* 


2838 


2842* 


2843 


LINE NO 


001156 


1449* 


1781 


1876* 


1905* 


2049 


L1NE2 


007144 


2709 


2753* 








L1NE3 


007666 


2836 


2869* 








LINES 


020050 


3369 


4574* 








L INE5A 


020054 


3384 


4576* 








LOGICA 


010740 


1403 


3140* 








LPR 


001 142 


1443* 


1858* 


1879* 






MAC HER 


000004 


1394* 


1518» 


1531* 


1631* 




MASK 


001160 


1450* 


1881* 


1908* 


1909 


2046 


MESG5 


020066 


1618 


1 792 


4578* 






MG24 


012042 


3350 


5356 


3400* 






MG25 


012046 


3360 


3404* 








MODE 


001260 


1473* 


4137* 


4143 


4146* 


4157* 


HONIC 


011324 


3285* 


3343 








nOVNUM 


01 1 770 


3344 


3357 


3361 


3384* 




NEW 


020143 


4096 


4593* 








NO 


002634 


1737 


1754 


1 764 


1 772 


1804* 


NRCRA 


001 140 


1442* 


1776 


1837* 


1838 


1842* 


NXTST 


001 110 


1430* 


1615* 


1 771 • 


1820 


1822* 


COD 


020115 


3393 


4584* 








OPEN s 


000000 


1 352* 


1428 


1429 


1430 


1451 






1448 


1449 


1450 


1457 


1458 






1473 


1474 


1475 


1945 


1946 


OUT 


016220 


4079 


4081 


4132* 






OUTPUT 


012152 


3433 


3452* 








OVER 


016000 


4087 


4090* 


4107 


4119 




PARITY 


001 126 


1437* 


2125* 


2130* 


2133* 


4 9 f 

2155* 


'ASCNT 


01 1 l24 


3162* 


5184* 


5186 


3194* 




PASHES 


01 7555 


3185 


4539* 








PCHAR 


001 130 


1438* 


2124* 


2125 


2126* 


9 9 *V 4 

5571 


PFAIL 


004216 


1 506 


2235* 








POPSP = 


005726 


1355* 


4094 








P0PSP2S 


022626 


1353* 


1526 


4 r V A 

1558 


4 ^ £ 4 

1651 


1679 


POSI 


001 122 


1435* 


3241* 


5244* 


5265* 


5270* 


PRGTAB 


003246 


1771 


1934* 








PRINTCs 


10401 1 


1367* 


2031 


2184 


2540 


2544 






2732 


2739 


2745 


2800 


281 5 






2897 


2903 


2918 


2944 


2948 






3067 


3109 


3130 


5167 


9 4^/ 

5174 






3580 


3583 


3585 


5591 


5595 






3626 


3632 


3634 


5656 


9 ^ 9n 

5659 






3662 


3664 


3786 


9 *V A/* 

5789 


9 A A ^ 

5802 






3921 


5925 


5927 


5954 


3945 






4020 


4022 


40^4 


403U 


4U jc 


PRINTJ 


0054 74 


2393 


2551* 






2796 


PRTHDR- 


104012 


1368* 


2656 


2661 


2707 
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1647 


1794 


2044 


2115 


2591 








2904 


2970 


5153 


5180 


5444 


5782 


5986 


4026 


2062 


2085 


2106 












0 AC X 


OAC C 

i0^5 














1 O 




cUBU 


5 1 ni 
£ 1 U 1 










1 *» 5c 


1 *» 3 J 




1 ••3D 


1 't3D 


1 'i3i 


1 / 

1 >• 3S 


1 "I 37 


1459 


1460 


1461 


1462 


1469 


i470 


1471 


1472 


1947 


1948 


1957 


1958 


1966 


1967 
























I ? 70 * 


33f V* 












1 7A5 






















CO r 1 




COOO 


CUT 1 


?71 3 


2846 


2848 


2858 


2860 


2863 


2884 


2888 


2889 


2949 


2957 


2963 


2965 


2967 


2997 


5017 


505i 


5243 


5267 


3464 


5552 


3558 


5551 


5575 


5578 


5595 


5598 


3605 


3607 


3610 


5615 


5622 


3624 


5641 


5645 


5646 


5649 


5651 


5655 


3656 


5660 


5805 


5885 


5885 


3895 


5899 


5901 


5905 


5905 


3947 


3977 


5979 


5990 


5992 


5995 


4010 


4015 


4034 


4102 


4166 












2855 


2880 


2940 


2995 


5062 


5106 


5127 


5165 



tZLADDO LA56 

czlaoo.pii 
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SEO 0108 







t 5 1 A 


3c3t 


3c03 


3333 


TA3A 
3"»aH 


3HOi 


TS3? 


J JO 1 


PSW = 


1 77 7 71. 

1 IT (lb 


1 3£T# 
















P 1 0 




1 A.1 c 
lOl 5 


IOTA 
1 V3h 


3ATAir 


X^ 3A 
3 1 cO 










DTI 

Pi 1 


00oo3h 


1 OT^ 

1 733 




3AS0« 
c03t» 












PTIO 




1 OL 5 

1V*»c 


DOG? 


3UOUV 












AT 1 1 
Pi 1 1 


A1 AA./ 0 


1 7«»3 


J\)0 1 


3 1 Uh« 












PI 1 ^ 


A 1 AA. 7 / 


1 QLL 


3 lU? 


T1 

3 1 c3* 












PI l^A 




3 1 coK 


T1 A^ 
3 1 H J 














D T 1 7 

r\}f 


A 1 A7X./ 
01 Of OH 


1 Q/.0 


3 lOU* 














Pi 1 fo 


A1 ft7C/ 


3l3f » 


3 1 30 


3 1 0 1 












PT 1 rO 


A 1 A77i^ 


T1 

3 1 37 


T1 AAA 
J 1 OHJ» 


3 1 7t 












B1 0 

P l£ 


OOOr >0 


1 OTA 

1 730 


?AAn 
cOOU 


C ' w3* 












PT 3 




1 0T7 

1 T J 1 




370LJI 












B V / 

PTh 




IOTA 

1 7 jO 




C V J 1 












Pi 5 


AA 7 7 A/ 

00' 'Oh 


1 QTO 

173t 


COJC 


cO 1 0» 




A 7 1 D 








PT5AL 


010052 


JQIMk 


301 3 

C 7 1 C 


3Q1 Af 


3073 








B T ^ 

PTO 


Ai Aim 
0101 10 


1 tHU 


CO f T 


A7 JOW 












BT 7 

Pi f 


A 1 1\1 7 5 


1 0/.1 


3QTQ 

C 7 J7 


300 If 












m iC CI 
UUC9 1 


UcOl J J 


H 1 1 O 


H jyjm 








1742 


5215 


3534 


BC Af\ — 

READ 


1 OhOI 3 


1 tAOif 
1 307» 


171^ 

1 f 1 3 


1 737 


1730 


1 739 


X 7Q/ 
3 1 TH 


37f 0 


TOOA 
3t70 












B C C 

REr 


AA7<k 


5fl *7 


3ft«i3 


AO 3 f * 






3166 


3173 


3181* 


DC DT 

Ht r I 


nm 11/. 
UO 1 M *» 


1 LT?f 
1 H JtW 


t H f V ■ 


2S03* 


2588* 


3164* 


DC C T D T 














2363 


2410 
2579 


2414 


R 1 NNU 


Art 1 1 nt. 
OU 1 1 00 


1 LPQif 

1 Ht 7W 


1 S7n« 

1 J f u 




1821* 


2356 


c3 1 J 


c 3Hv 


A JHH 


2S48 


2571 


2575 


2586 


SAVRo 


AA/ OC "5 


££HC" 


33A7JI 
ccH ' K 


33S3 

A A JC 


31 1 S 










SCANDH 


AAO^ 7/ 
OO^Of H 


1 7nQ 

1 f U7 


1 ATT# 


1 RA1 

\ OH 1 










SCANDJ 


003106 


1 AB7 

1 003 


1 OtU* 


1 AQ7 

1 OT f 


31 1 A 

Alio 










SCR 


A A 1 1 1 ^ 

001 1 56 


1 A/. 1 M 
1 HH 1 )» 


1 S^A* 
I 030* 




30L0* 

A vH 7 ■ 


4110 








SCRLr - 


1 A/ AA7 
1 0*»00' 




31 S7 




374A 


2558 


2610* 




c r D 1 


AA1 JTp 


1 Lk\t 
1 "to 1 " 


?4?4t 


2430 


2498* 


2553* 


2439* 




00 1 C JH 




3<i^0* 

CH JV 


2431 * 


2434 


2436* 


2437* 


2438* 


CH f ( ' 


3^AAt 

cHOO* 




7489* 


2490* 


2491* 


2558* 


2559* 






t Jt J" 


C 37H " 


CJrJ 


2597* 


2598 


2603* 






C C T f\ 1 


ArH5 1 L 


t OOH 


19234( 


2119 












C C T C DM 


AA57CA 
OUc 1 J\) 


1 710 

1 r 1 V 




2116 


1 761 


1787 








r nB/\ T 

SPBOT 


AA 1 1 ."\A 
001 1 00 


1 A73lf 


1 A01 

1 H 7 1 


1 AAA 

1 OuO 


3034 






c Dr 
SPC 


AAA 7A A 
000 ' hO 


t O 


c ou^ 


2809 

L D W 7 


5000 


5013 






C Df WT 


UU 1 1 1 0 


U33« 


?797» 


2807* 


2808 


2815* 


2816 






C DCD 

irbr 


000 ( CO 






2682# 












coo 


UUO f hU 


coo / ^ 


?7?8 






1559 


1613 


1661 


2099 


CD 






1496 


1500* 


1546 


CCD 

5SR 


AA1 1 O 

00 1 1 5c 


1 HH / ^ 


1 AA^« 


2052* 












C t A D T 

5 1 Aw 1 


AA1 5 7a 
00 1 C '0 


1 A 
1 H 1 O 


< HOTW 














C T ADT M 




1574 


4524# 


2260 












C T A D T 


rtA^ Trt5 
00 t 30c 


1 HOO 














C T A D T 1 


AAI 5A*> 
00 1 cOO 


1 H 1 f 


KA7# 


37591 












C Tr\DC 




J f CT 


3745 












strln 


A 1 1 7 1 0 

0 11 r 1 c 


XXXQ 

333t 


333 3 


3 J 3 7 










SWR 


020130 


A AQ1 
hOt 1 


H 37 ) » 




4078 












0001 7h 


U1 21 


1500 


1546 










TBUF 


001242 


U65# 


1929* 


2059 


2064* 










TCR 


0012AO 


K64« 


1927* 


2055* 




1746 


1753 


2048* 


2050 


TfWPCM 


00112A 


U36* 


1712* 


1719 


1734 


2310 


2402 


2407 


2443* 


2444* 


2446 


2451 


2466 



5718 3770 



5876 



5967 



5427 

3182 
2418 



5495 5616 

5240* 5242 
2453 2457 



5730 



3775 



5264* 3266 
2461 2468 



2562' 



2441 2443 
2563* 2564 



2475* 
2566* 



2476* 
2567 



2099 2396 2533 4078 4092 4128* 



2065* 
2470 



2082* 
2505 



2087* 
2515 



2128* 
2538 



2157 
2567* 



CZLADDO LA56 
CZLADD.P11 



OHII/DJII 
03-AUG-79 



TEHPST 
TENPUR 
TERM 

TESTC = 

TEST50 

TEST31 

TEST32 

TEST33 

TES134 

TE5T35 

TIB 

TIMER 

TIMES 

TTtCTL= 

TTYJ 

TTYJA 

TTYJTL= 

TTYl 

TTYIA 

TTYIB 

TTYIG 

TTYIH 

TTTiL 

TYP 

TYPE = 
TYPEH = 



TYPM 

TYPOC 

TYPON 

T30SC 

WIDTH 



SBTASC 

SCKSUR 

tCLFAN 

SCNTIU 

SCR 

SCRLf 

SECHO 

SFORUD 

SFOUR 

SINRDY 

»Lf 

SPRHOR 

tPRTC 

(READ 

sscrlf 

STESTC 



001252 
00U10 
012224 
104020 
012740 
013122 
013740 
014170 
014724 
015274 
001250 
001102 
001264 
10400H 
002112 
002114 
104005 
002142 
002144 
002174 
002500 
002540 
002606 
004114 
104000 
104002 



004144 
016222 
016236 
013120 
001112 



004320 
015736 
002020 
015774 
004506 
00^^474 
003516 
002652 
003476 
003654 
0044 76 
004516 
004572 
003716 
004456 
004424 
020162 



DIAG 
09:18 

2568* 

3454 

4084 

1470# 

2281 • 

2412 

1374# 

1960 

1961 

1962 

1963 

1964 

1965 

1469# 

1426# 

1475# 

1362# 

1679* 

1622 

1363* 

1702* 

1621 

1685 

1682 

1787* 

1777 

1995 

1358* 

1360* 

3364 

3637 

3968 

1997 

4093 

4138* 

3528 

1431* 

2961 

3935 

2008 

2016 

1631* 

2017 

2007 

2001 

2012 

1820* 

2015 

2013 

2003 

2005 

2004 

2006 

2002 

2011 

1387* 



"7 C D / 

2584 


25oS 


T 5 1 fi 


I XT 7 


T T/ n 


54DO* 


3«»Vo 


1 o 


I^5B 

3o^o 


3f 3 1 


y 1 AT 










/ 1 5n« 
«• 1 dv* 


/. 1 5 1 • 


L 1 55« 


L 1 5A» 


H \ CO 


idol 










5C71 
CJf i 




TZ.A7* 
3*0' » 


























iooo 








1717 


175 7 










JOCC 








3875 


3949 








3966 


4028 








4104* 


4105 


4108 


4115 


4115 


3736 











1796 



1797 
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2569 

3455« 

4101 

4097* 

?285 

2455 

1721 

5520* 

5571* 

3716* 

5768* 

5874* 

5965* 

4105* 

2217 

1650 

2000 

1680* 

1649 

1999 

1705* 

1711* 

1708 

1802 

1798* 

2150* 

5545 

1573 

5467 

5644 

3980 

2175* 

4136* 

5565* 

1566* 

2995 

5942 

2278* 

4078* 

2010 

4088* 

2545* 

2558* 

2044* 

2009 

2029* 

2080* 

2559* 

2554* 

2585* 

2099* 

2325* 

2310* 

1391 



5548 
5734 



3551 
3^78 



3450 
3797 



3432 
3973 



3456 
4001 



SEO 0109 

3442 • 
4080 



4125" 4^24 



1776* 
1808 


1782 
2422 


1786 
2465 


2552 


2583 


5627 


5735 


5780 


5799 


4057 




5562 
1585 
5490 
5654 
5996 


5495 
1611 
3506 

5722 
4004 


5745 
1617 
3508 
3724 
4085 


1791 
5524 
5775 
4090 


2250 
5527 
5792 
4095 


2554 
5576 
5808 
4117 


2637 
5586 
3809 


5189 
5596 
5811 


5225 
5608 
5814 


3249 
5611 
5816 


5275 
5615 
5817 


2642 
5012 


2798 
5029 


2816 
3165 


2855 
5172 


2851 
5241 


2881 
5265 


2890 
3488 


2901 
5548 


2916 
5558 


2941 
5881 


2950 
5912 



204 7 
2086 

2102 2107 

1592* 1596* 1401* 1405# 1409* 1420* 2616* 2780* 5475* 5759* 5855* 
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SEo ono 



40S9# 459 7# 



. ABS. 020162 000 



ERRORS DETECTED: 0 

CZLADD.BlM,CZLADD.LSr/CRf /S0L/NL:T0C=CZLADD.P11 
RUN-TlNfc: 13 28 1 SECONDS 
RUN-IIHE RAIIO: 569/<.4=8.2 
(ORE USED: 7% (15 PAGES) 



